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Apresenta^ao 

0 mundo £ nossa volla est£ soften do constants avan^os 
tecnyioglcos S, <■■’111 cgnsequeincia, tcirtiirdiando a p^SSQS largos 
para lima nova «ra„ 

Uma caraderebta pecuT-iSF dei>sa evoluio&t? t a jx>&&!bfMda.c&e que 
o bomern modeioa dispoe d<? uhktir-se de uma empla variedade de 
equipamentos detr6nlcos, indmndo-se, antre des, os computodoree. 

Estes trailsfOfriiaram, em pmicoi aiios, a realldade de uma eerie 
da atividades humanas, de tal forma qua a InfarmAtica, sem duvidfi, 
tender^ a abranger. cada vat mate, a oenda manejada peb 
homem da aluatkiAiJe. 

Um compuladtii pessoa] a. por assim dizei. O fesukado dessa 
evolu^So tecno!6gica que ; alraves da miniaturiaa^So dos circuitos, 
produziu um computador bastante compacto, porlm com multiplos 
racursos funcionaig — tal como o &eu CP-200. 



Seu uso estende'se de pequenos program as tiidaticos a cabubs 
dentificos, estatldo ainda capaCitado para e!abcrar programas 
adminisfraJivos confroles con.ESbeis e bancarlos. sem meneksnar sua 
uttHdade enquaffio instmmcnio de laser — onde voce pod ere 
evideneiar loda cnatividade elnboiando jogos ebTroncos, 


DaL pode^ec condu;r que uma Hifirtidadle de processes e 
alividades de seu coUdiano podem ser simplificado$ peio uso do CP- 
200 a, a cada dim voce provavelmenfe [ra deseobrir uma nova area 
de aplica^ao para ele. 



E, rnesmo que voc& nSo e$1eja familiarizado com computadones. 
apos algumas horas da tresnamento, j£ eslam apEo a program a-lo r 
fjois sua aprendijageim torna-se muito simples, em tasSo da sua 
opore^aa extrert-.amente simplificcida — a qual esta detalhadame :, ?v 
<?nplicada n«sle Ivro, 


Como utilizer este livro 

Todas as inlotmacoes necssafirias 3 correla manipulafao 
do CP-200 est&O eontidas neste Iivto- 

Ele foi elaborado com o objetivo de auxiM-to na iniiaJapuo, 
ptograrnacao e operate Jo micro, ao mesmo tempo am qua o 
ansi?!a a eKpbrar iodas os recur^os que de apresenta -- desde 
qpera^j&as mais simples as mais comptexas 
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Se voc& £ urn prindpkmte, a malOr parte deste Livro foi escrlta 
para voce: auta-instiutivo, ate e dirigldo aas iniciantes na area de 
computa^SQ e, a mecheSa que cfereoe urna destri^aa complete dm 
components Juncionais v. estrutuiais do seu computador, cobta 
ao seu akance um curso completo da Unguagem BASIC, 

Cada um de sens capftulos sews de [nforma^So aos que se 
seguem. Pgr isso, acqmpanhd-Los em sqqilencia *? essential, 

Stga com a leitura cc ntinuamente, sem ignoraf 0 $ exarados - 
eles luvantam os pantos inliiressantes que sao abor dados no tex(0, 
Se coint^ar a notar que 5uas respdstas nao eStSd con-etas, 
h passive! que> voc§ nao ten ha estudado 0 rexto at^ntamente. 

Nesse caso, reestuds o lexto antes d* passar adiante. 


Suposicao 


Metodo 

Voce nada sabe aobre 



conriputadorea ainda... 


Guia passo a passo 



No enSanto, nao se preccupe em dissimilar Sudo de uma s6 vez. 
Nos c instruliernos pasao a passo e, por consegumle, cada conceilo 
say6 iatrodLLaido a sen tempo. 

No final, voce eneontrarS os Ap&ndices e o Glossario. 

O Apertdice A apreseota, initial men te, as pecubaridades 
do CP-200, .'in- que se segue um resumo de suas caracterfeticag .•: um 
quadro sinnptma de suas principais I unices, comandos e insEru^Oes. 

O Apendioe B irS auxllia-lo na interpruta^ao dos Cddigos de 
£rro que aparccenn no decoder da diglta^ao dos dados, enquanto 
que o Ap^ndice C aborda O Condign de Caraeteres do micro. 

Q GlossAno serw£ p t Lra etucidar a lerminofogia t&cnica utilifrida 
nos textos.. 

Se vocS jS conhece <1 linguagem BASIC do computador, ieia 
ape n as 0 Apendice A e use os capftulos anteriores apenas para 
esclarecer pontos obscures, 

Para aqueles que se inieiessarem era domirw completemenlfi 0 
CP-200,, suyerimos que esludem atentamente esie liv^o, testando 
novas solugdas para os exerciios proposes, ou majmo, elaborando 
a«us pr6pno$ program as, utElizando-se das variances das 
caractarisfioas do sistema 
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Introduce 

Descricao do Computador 


Wreriiios, nesse capftulo, como e consiituldo q seu eomputador 
e como ete faz para comuntcar-ie com vocst, entraremos 
detalhes t^cnicos, mas, para aqudes que se tnteressarem, o capftulo 
XIII abordari alguns aspectos tfcnlcos do CP-200. 

Extemamente, podemos ver as tomadas para ligafSo da an ten a 
■da TV, do gravador cassete e do cabo de aJimenta^o, af-em do 
teclado, Na parte interna esta o computador propriamente dito. 

Passemos prEmelramente S parte externa. 


O Teclado 

O teclado do sen CP-200 k semdhante ao de uma maqulna de 
escrever eomum. 


Existem, porem f significative diferen^as enlre ambos: 

—'No CP-200, quando voce pressiona Lima teda qualquet, o 
computador emite um smal sonoro (urn ,l bip M ). Esse Sinai sennit 
como uma Endica^o de que a [ecta foi. pressionada corrciamenle; 

— As teda$ do seu computador sao topazes de introduair nap 
apenas os caracteres normais de uiiia maquina de escrcver, como 
tambem instrut^es, comandos, fun^oes e sfmbobs grdficos. 

Com apenas uma leda vot£ ser€ capaz de gejfar at£ cSnco contrdtss 
diferentes, como e niostrado na ftgura ao lado. 


Obsepje que: 

— 0? caracteres em branco, no interioi dastectas, representam 
os numero de 0 a 9 e as tetras, de A a Z. A esse conjunto 
denominamos caracteres de texto. 

— Os si rials e paiavras em vermdho $ao denotfiinados 

comandos. 

Para adona-los deve-se proceder como que para as majuscules 
de lima miquina de escrever cornum: presstane, simultanearnente, a 
teda SHIFT e a que contiuer o comando deseptda. 

— Ex istem am da as fungous [locaiizadas sbaixo da s faixas 
brancas) e os carat teres graficos (no interior delas). O modo de 
utillzS-los serS explicado a seu tempo. Asstm. voc£ nao ficara 
sobrecarregado de informagOes que s6 set£o Qteis mats [aide. 

A figura mostra o teclado do CP-200. 


Ob*erve-o, mas nflo se proocupe em tentar entender o 
significado de mdc que apanece ode. 

Cada item sera deialhadamerrte esdarecido no momento 
oporfuno, 

Mais tarcle, apds cortectar o computador ao seu TV. tente 
digital qualquer cotsa, sem impottar se com o teclado, para f spends, 
acostumar se a ele. 



InstfLji^iD NEW 


NEW 




Os C omponentes fntemos 

0 computador £ dividido, internamen.le, em trfis partes 
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principals: 

— o micsroprorassador; 

— os circultos de sntrada e safda G 

— a memdria de armazenameiito. 

0 Mlcroprocessador 

O rnicroprocessador e o components fundamental do sen 
computador: e ele que execute todas as instru^aes com grande 
vdocidade e confiabAdade. 

N& re alidade, tudo t> que de faz £ obedecea: as suas ordeos, 
efcetutondoas a rises, Por isso, os instrugftes devem ser daias e 
prerisa$ para expresses exatamemte o que voce quer que ele faga. 

Note, atnda* que essa comurucat^o ftfitre o computador e voce 
s6 £ pos&ivel atiaues dos dispositivos de Entrada e Saida. 

Ln (radii a Saida (E/S) 

Quando voc£ digjta uma men sage rn qualquer no seu CP-200, 
esti LLfiluando um dispositivo de Entrada do dados (mforma^Oes) — 
no caso, o teclado. 

Uma U 02 Lnterprotada s executed ii pe!o microprocossador. a 
mfoimasao final Ihe ^ devofvtda atrav&s de um dispoatfvo de Saida, 
e> qua’ pode ser o video do sou televisor. 



Mem6rta 

As [nfoimagdes, dentro do compulador, sSo guardadas em 
dispoattiuos especlais denominado? Memdrias, 

0 CP-200 k constitujdo de dois cipos de imemdria: ROM e 

HAM, 

ROM — abreviatura de Read Qri/y Memory (Memotia Exdusiua 
de Leitiira} E a parte da memoria cue armazena as tnforma^oos, as 
quais instrurem o microprocessador sobre como interpreter os dados 
rn-iroduados, como proccssa-bs e dewtv&bs de forma que o 
result ado corresponds ao esperado. 

Essas informa$5es nao podem set altemdas pelo 
microprocaisador „ mss apenas lidas (dal 0 nome) 

RAM — abreyiatLiras de Random Access Memory (Mem6riia de 
Escrita e Leltura). E a memom que permits ao mieroprocessador ter 
um acesso total 3 informacao armazsnada, quer seja para a sua 
leltura ou para introduar modificacOeSn 

As Informa^Ses armazenadas na RAM correspondem aos dados 
e pro^ramas que voc& introduz no computador, Mas, ao desligfi-lo,' 
esses in formats s£o apagadas da mem6ria. 

Cad a Infocmagao fletra, numero, sinal, iristru^ao, etc) ocupa 
uma Certs pos&o na menirfxla. No CP-200 voce leFa 16 mil 
posi^Oes dJerentes para armazenai inforrrja^Oes. Em computa-^So. 
denomjriamos estas poaches de portanto, dizemos que a 
capocldade de mem6rta RAM do CP-200 e de 16 kilobytes ou, 
$impE06mente d 16 kbytes. 

Prngromia 

Program a pode set defintdo como uma. seqaanda de instru^aes 
ordenadas e inter-relaciotiadas que ''dizem' 1 ao computador o que 
deue ser tealizado. 
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Dizemos que el as $ao ordenaUas porque e«as instrufoes sHo 
aubmefidas a uma ordem de execuc^o; ettso intermeIacibnadas 
porque exists uma relate definida entre as instru<;6es a fim de que 
se atErtja os objetlvos do programs, 

Podemos a in da comparer os programs do oomputador com 
aqueles encontrado$ em certas m£quinas de War. Nessas m&quinas 
podemos escdher; dentre vinos program as, aquek que irtcds se 
adapia h roupa a ser Savada. 


("ada programs apresenta uni a opera^do dlfercnte 
con^LderancEo-.^e as caractereticas de cada tipo de roupa. 

Da mesma forma que nas mSquinas de War. no seu 
compytador,, vt?c£ podera escofriei o programs ideal para o tipo de 
splicac-So desejada. 

Voc£ airida poderS ter a vantagem de elabomr seus prop ri os 
program as. Segumdo esse liwo, voce irS op render como fazer isso. 


UngMagon 

Para ll dlzer fl ao computador o que ale deve faster & necessario 
que seja estabeleclda uma comuntcag&o entre voo* « o computador. 
Por $ua v%z, essa oomunica^aci so seri possiveE airaues de urna 
linguagem comum aos dais. 

Derntre as dE versus Jisiguayens "fatadas” peJos computadores, 
podemos deslacar a FORTRAN, ALGOL, COBOL e BASSO, 

A linguagem escdhida paia o CP-200 foi n BASEC, porse 
tratar de uma linguagem simples e eflciente. vottada justamente para 
os principiantes em computasio. 

BASIC e a abreviatura de Beginners All-purpose Simbotic 
instruction Code fCodtgo 5imb6!ico de 3nstrutso, Universal, para 
PrindpiantesJ 

Fundamentatidp-se no voeabulfirio basico da lingua inglesa, o 
Besic utiltza-se de instmgoes, comandos e {undoes de fScil 
compreensao, sendo, por isso, propria para principle ite 5 — o que 
pcrmitira a vocd urn rapido aprendtzado das tecnicas de 
programa^ao. 
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Instala^ao 



Passemos agora a instala^elo do seu computador. 

Para obter-se o maxtmo do desempenho que ole pode ofereccr, 
voc£ devera acoplalo a um televisor e a urn grauador, 

0 televisor servira para voce acompanhait as Inionnagoes 
digstadas, o resuli&do do piocessame-nto e os cddigos de erro, s sera 
lmprescindfod pom a operae&o com o CP-200. 

Poderft ser urn aparell'ic comum. preto e branco, ou a cores, 

O gravador ser£ utilLzado para gravar programs do computador 
pau a fita, an mcsmo para copi£ I os de volta para a rda, Lembre*se 
?,LP,da de cue uocfi podera, Samberrn infroduzir no grauadoy 
prc-gramas de ftLas pr£-gravadas. 


Moutotf&rtt 


Prirneiramente, corrects o cabo para televisor na entrada da 
anlena do sen aparaiho da TV € na tcruada atrSs do coropisSado: 
fnwada 'TV"), 

Ligue o televisor e o CP-200 a rede eletrica local, verificando 
anUis se a tensao local correspond® a do computador. 


Temails para em-trra externa VHF 


AC UGA flOO in A 


®fMV40GR 


Agora o seu computador ;fi esta eni funclonamento. contudo, 
vnc^ n&o tera nenhuma indicac^O dlsro at£ que ajuste a imagem do 
seu televisor, 


fyfiiste do fmodern 


Cdoque o sektor da TV no canal 2 ou 3 VHF e ajuste a 
siEitonla ate obter, no canto Inferior esquerdo da tela, a letra K 
dentro de um retSngulo, 

Tense otter a mdior imagem possivd atraves do confcrok da 
sinlonia e n ent5o, aiiaves dos connotes de bnlho > j tontrasie, qjusle □ 
letra O no mnelhor ponio de visibiildade. Se sentir alguma 
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diftf ; tads trn ajusiar a ~n^ge m com a kiu O. presstone uma leda 
qualquer. como P, poj exempta. A^sJm, urn a palavra na tela 
JacilidarA mais ajustes. 


Cum a Lmagern nltida na teta t seu cornpulador estS protito pfttt 
a too. 

Z claio que J-iltcu conectar a tjr&vador. mas, para a primen^t 
pane desi*: curso, n^c prec^rernos dele 

Darernt^ i sequur uma Itsia dc como precede* para ecJocar seu 
cornpulador cm opera^-ao 

tn^t a1ag.au * to CP-2QQ 

\ Coneciar o cabo de TV £ entrada da antena do TV & ao 
soquele (ro..’rcade "TV") r><? CP 200: 

2 Li-gai o TV a o computador a rede eletrica. 

3. Ligiir r> teforitor e o CP-200; 

4 Aju^lar a sintoma at£ otter a tetra (3 na tela; 

5 Ajusl i; o bribe* e o con Erase para melhorar a imagem 
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Operate 




Operagao 


Agora voeS \& tern o seu compuitador Lnstalado e pronto para 
operar No cano inferior esquerdo da tela deve estar o cursor 13 
■ndicando o modo de intrndu^o de inslrugoes. Caso voce ja fen ha 
pressiortado algumas tecta s e digitado aigynna coisa, e nao saLba 
comtj apagd-la. simptesmente desligue o CO m put ado r, tornando a 
apds alguns scgundos, Este procedi memo nao prejuditara 05 
ajustes f & reataados* 


O cursor O indica que voce podc jniioduzir instrucfies no 
computador para que de as execute. Poreni, como L 'dner" ao 
computador 0 que eta rieve laser? Com puJ adores riSo ‘tantendem" 
poTtugu^s! 


A linguagem BASIC 

Entrc as diverges linguagens utihzadas pelos computadores uma 

se <ksl&ca pek sua ampfcridede e efictencta a linguagem BASIC. 

Como )a foi f&lado atguma coisa a respeito do BASIC no 
capilub L neste captluta daremos algumas nofAes do como fazer 
paia quG 0 compufador execute inshy^es simples e daremos, ainda, 
algumas dicas de como conrigir erros de dlglta^o. 

As In stresses em BASIC sao introduada? I in ha at linha, cad a 
uma detaa segtiida pelo acionarnenfo da teda Nl ENTER" (em 
portugu^$ H introduSr). 

Ao tniroduEose uma linha, o CP-200 podera processa-las: 

— (mediatamtnte. apu< pressionar^e a teda ENTER (Linha 
ImediatuK ou 

— Guardando as na memory para uma e*ecu£io posterior 
[Unha de Programs). 

Paris que o oomputador recenhe^a entra uma txiha imediita e 
uma ]inlis de programs, esta uhima diver i ser serrpre preosdida de 
um nuitierO inleiro, Este numero, atam de jjCx^z so ccaiputadoe 
que a Imhei & de program a, ir£ posiciona^la er.tie oicras, sempre 
obedeCeiido a uma ordem creiicente de $eus n£m<eros> 

As linhas do programs serao detalhadamente expeeadas em um 
oufto capMo. Por enquanto, nos iLmitareETLQS as Lnhas Crjediatas. 

Cojn 0 cursor @ na tela, digits PRINT (teda P): 























Com PR] NT na tela, o cursor muda do modo □ para o mode 
0 . indicando que a prdxima tecta a ser pressSonada colocar^ na Ida 
uma letia ou numero. Ptession®, agora. o rtumero 2, Na tala eslar£ 
a instrugAo: 



Esta I'inha na tala skgrtifica para, o corripuSador o mesmo que 
"imprima o atimem dote" (PRINT, fill port agues, significa imprima) 
Se acjoia vqc£ presslonar ENTER, o comput&dor entenderS (oomo a 
Imha nflo cometa por ntimero) que dev£ GKecutar a ordem 
Lmedialamente, e impriniira no canto superior da teta, o ntimero 2 . 
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Opera^ao 


Se voc£ njg enrou ao pressionar as leclas ate agora, a Ida ficar& 
como k moistrado acima. Mas nSSo se preocupe com o 0/0 na tela. 
Trata’se de um codigo qua o CP-200 util 12 a para infomnar que voc£ 
introduau a I in ha eorTelarnente, bto sera explicado de teftbaffcmente 
nos prdximos capftutos. Pqi enquanto, continue operando come se o 
•eddigo 0/0 fosse a letia Eli . 

Porem, to-dos nds, as vews, cometenios pequenos enos. Os 
que surgtrem durante a dtgita^o de uma lioha podem -ser facilmente 
COmgidos, Para exemplrfiear, digamos quo voce queira rnandar o 
computador imprimii o numero 1982 e, addenfalmnente, digits 
PRINT 2982 Ns tela apareceras 


Vocd pods corrigjr essa [Inha usando o comando DELETE (em 
portuguys, cancelar) Para usd-lo, basta manter pressionada a tecLa 
SHIFT e picssiionar e leda correspondents ao DELETE tOj. Fei:o 

is$o f apareccra na tda: 



Rcplta a operaqao ate que o cursor fique logo ap6s a jnstrus&c? 
PRINT- Nesse ponto voce ja pode introduzir o nijmero correto c 
prosseguir com a execute da linha. 

Se vo<4 ri3.o pressionar SHIFT e DELETE simulraneamenie* 
apareceia am Eero (G) na tela ap6s> o numeio 2 . 

Por isSO, tente repetir a corre^So. 

Pressione SHIFT, certificando-se de ler ouvido um TxpT ao 
rrtesmo tempo em que presswna a ieda DELETE — para a qud 
corresponder^ um nouo Trip". 

Em alguns casos 4 rnuito trabalhoso corrigir um erro qye lot 
cometido no come^c de uma extensa [inha. Pelo metodo descn'o 
leriamos qtie apaga r praticAmente toda a fcnha para corrigi? o 
eno e digitar novamante o reslante da tinha, 



Visando esses casos* o CP-200 possul dois comandos que 
rcsolvem e&le problems. S5o os comandos — e — 

Suponhamos que voe£ quEnese mandat o CP’200 imprimir o 
ndmero 65378 mas digitasse,. par engang, a instru^o POKE, ao 
inu£s da instru^ao PR [NT. 


17 



Tente digitar e coniglr a mensagem da figura abaixo: 


ser& necess&io apagar coda a linha corn DELATE para 
eorrigir ape n as a instfucao POKE, Digte a [inha ereada e eniio 
pr&sskjne SHIFT e * fleets 5), A Itnha *icar& assim: 


mantenha SHIFT presslonada e acione ™ mais quaere vezes ate que 
a linha fique desta forma; 


Se voce pre$£onou *“■ uma vez a mi* do que devia, o cursor 
estar£ antes de POKE. Ncsse case, use o comar.do =*, que move o 
cursor para a direita, e coloque-o na pesL£5o adequada. 

Com o cursor irneefotamente ap6s a Lnstru^o a ser comgida, o 
procedimenio para a correct £ normal, ou seja, atraves do 
comando DELETE. Entao maos a obral FYessione SHIFT juntamente 
com DELETE e, em seguida, a InstrufSo desejada, no caso, PRINT. 
A linha na lela fLear k asslm: 






IS 



Oper^ao 


Agora pressione ENTER e a !mha sera execuladrs, aparecendo 

r* 


H6 aindfcs uma ouiTit infitruflo que modifier o conietido da lela T 
£ a instru^ao CLS. EsIej slgia e abreviatuia de CLear Screen que 
sgplfica Apa*jar a Tela, Digits CLS & ENTER fi veja que quaJquer 
informa^ao imprests rm t-t?La sera apagada, ficando apenas o cddlgo 
0/0 no eanlo foferior fcsquerdo. £ irnpotf&ttfe notar que CLS 6 uma 
instru^ao completa, portanto nao se deve digitar nada antes on 
depoisdessa instrugao. A linha imediata flea simptesmerite 




Erros de Sintaxe 

Digite Z T 3 e pressione ENTER, 

O que aconteceu? 

Voce pertebera que n3o h& residtado na parte superior 
esquerdte da tela, mas, como voc£ pode notar, o cursor S apareceu 
ern sua parte inferior: 



B lndLca que voce omitiu a instrugao (nao digitou PRINT); 
indica que houve urn erco de sintaxe. No caso, o 
computador 'hntendeu" o mimero 2 como a indicate de urn a linba 
de programs, urna vez que foi .ntroduzido sum ama insUugao prdvja. 

|jr| viiLi imediatamente ap6s o elemento enrado. No exemplo 
actma, de aparece ap6s o sind + tndicando qua ngg poder^ redlzar 
a operagao (suma} $e. antes, voce nao aoionar uma snstru^So 
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1 — Digite Print 65 + 35 e pression? ENTER. 

Note que a operait;ao 65 4- 35 naa sera impnessa nea tela, mas, 
sim, o seu resultado (100). Isso aooniece porque o computador 
Amende” que o que deve ser impresso e o resuilado da senien^a 
matematica digitada, Como 65 + 35 = 100, o resultado, 100, foi 

impresso no canto superior esquerdo a., uo canto inferior, o cddigo 
0/0 indica que nao houve erro. 

2 — Digite PRINT 100-65 e pressione ENTER. 

O resultado, 35, sera impresso no canto superior esquerdo da 
tela, como no exercfcio anterior, juntamente com o codigo 0/0. 

3 — Para realizar divisoes coni o CP-200, uMlizamos uma 
nota^ao de Era^au para que o computador reconhe^a a opera^ao. A 
barra / e utilizada para este firm 

Digit? PRINT 3/2 ? pressiqn? ENTER. 

5er£ impresso na tela o resultado (1.5). 

Note que o computador utilize o ponto para separar os inteiros 
dos decimals, ao in yes de vlrgula. 

A — Para in dicar multiplicand*}, uMliza-se o simbolo 1 PorianSo, 
se quisermos imprimir o resultado da multipiicacao de 35 por 105 
devemos digital 
PRINT 35' 105 

e sera impresso o resultado (3675) na tela. 

5 — O slmboio * * (SHIFT e H) sigjiifica t: devado a po-tenda 
de'\ Esse comando especifica a opera^o de potenciac&o. 

Digit?; 

PR (NT 2" 3 ENTER (e o mesmo que “imprima o resultado de 
2 eleuado a tereeiira potential O resultado (S) ser^ impresso na tela. 
Obserue que foi caEculado 2'. 

Para realiuar mais de uma upera^ao por wz, sirnplesmente 
escreva a serdenca desejada apos a instrucao PRINT Por exempio: 

PRINT 2 + 4 - 3 * 5 

O resultado seri impresso na tela. 

Digite: 

PRINT 4 * *2—5* *3 a pressione ENTER. 

O resultado (—109) sera impresso na tela. 
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Primeiros Passes 


Primeiros Passos 


Imprimindo o Eesuttado de Uma 
Expressao Matemdtica 

Como voce deve ter visto nos exerdcios do capftub anterior. 
podffmoS fajer com qua o computador resolva equagfles que 
envotvam diverse operagses matemSbcas, (mprimmdo a restAado 
oa leta. Por£rn, ckuemcs saber elaborar ess&s equates, para 
dizermps ao computador exatamente o que queremos qua ele 
resotva. 

Em uma sentenga matemdtica exists uma ordain correta para 
executarmps estas operagfies. Em sentengas como 1 4- 2 * 3, em 
que dxislGtn operates matematicas dlferentes, caleula-se em 
primelro lugar, o resultado da mukiplicagSo 2*3, para, depois, somd- 
lo a 1 „ eniboxa a ordeni da sentenga seja primeim a soma e depots a 
multiplicagSo, Chamanemos a isso de grau de ptioridade. 

Atom da prioridade da rnultiplicagao sobre a soma, hh varias 
outras r-sgras qua astabelecem essa rdag<k> de pra Valencia. 
Rdadonamos, abaiKO, as principals: 


Grau dn prioridade 


Maior Express^ entre parSnteses 

FungGes Matem&icas (SIN, COS, SQR, 
etc,) 

PotendagJo (**) 

y Multiplitag&o f*) e Divis&o {/) 

Menor Soma { + ) e Subtragso {—) 

Den H o do mesmo grau de prigridadc, 0 camputador resJisa as 
operagOei na ordem cm que aparecem (da esquerda para a direftai. 
W^amos urn exempEo tlpico: 


Cirtun feiencia 


Para se oalculai o raio de uma gircurifer^nria divider? o 
conif>rimeoio da meima per duas ve^es fi (1§-se pi). tt e a relagSo enire 
o diameiro e compnmento da dicvmfcr^ocia e equivale a 
eproximariamenie 3,14159265. 

Podtrinos dkjHai essa formula de duas m&neiras distinias: 

PRINT C/2 “if ou PRINT C/(2'n) 

Para que &e introduza o numero n, c> cursor deve estar 
Indlcando o mode de fungao , pots o CP-200 considers o n como 
uma fung^o. Para introduar o cursor no mode de fungSc?, deve-se 
presslonar as tecEa$ SHIFT e FUNCTION slmultaneamente seguidas 
de ENTER, Assim o cursor S aparecera rid tela. Ap6$ ler 
introduTldo a fungao desejada (no caso, if) o computador reioma ao 
modo anterior ((H) r lndicando que voce pode digital a mensagem. 
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$e uoc$ introduzir as Irnhag, que o result ado sera ura 
e6digo de eiro (2/0). \$$o ocorreu porque vocl nSo irdormcu ao 
computador o valor de C. 

Tente novamente atribuindo valores a cirtunfenSneLa como, por 
example: 

1) Raio = 20/2*3.14 ou PRINT 20/2‘n. que resulta em 31,4, 

2) Raio = 20/(2*3.14) ou PRINT 20/l2*ir), que resulta em 
3.185. 

Como pedemos deduar, um rios resultados esta eirado. O raio 
de uma ctecunferentia n5o pode ser maior do que o seu 
eomprimento. Portanto, o modo (1} de escrever a equate estS 
inoorreto, De fato, se toarnarmos por base a tabeta de prioridades, 
veremos que do modo H as operates tern a iriesma prioridade e 
serflo realizadas na seqO^ncia em que aparecem. 0 resultado sera, 
entao, dado pela muJtiplLcac&O de n pela divigao 20/2ft, 

No mode (2.) a situate & in versa, pois a TflliltlpUcac&o entire 
pangrttes&s tern priocidade 50bre o regtameda. eqtia;So, Deg?:? modo, 
leremos a sequencia cornel a de execugSo. 


Imprimmdo mensagens 

Ate agora voc£ usou a, instru^ao PRINT apenas para imprimir 
numero^ quer sejam em in stru^es dlretas {corno PRINT 2) r quer 
sejam em ingtrugOes mas e'aboradag (comg PRINT 2' 1 4/BJ, 
Chegou o me memo do seu computador come^ar a Smpnmir 
meriMgens, !aig como; OLA; O RAIO DA QRCUNFERENClA E 
IGUAt. A, ere, 

Para infomw ao computador que voc& quCr quo $eja impres&a 
urna men sagem, voce deve digjta-la entre aspas (teda SHIFT e P), 
Veja o exemplo: 

PRINT “CP-200, 0 CQMPUTADQR PESSOALT 

O conteudo ente asp as sera impress* no canto superior 
esquerdo. 

Nao se esq mega que paia o oomputador execute essa linha 
imedlata, voe& deve introduzMa ftneUisraodo com ENTER, Enquanto 
nao for pressionado ENTER nada oconrera. 


Dizendo ao Computador Onde 
Imprimir 


Voce ja deve ter nolado que estamos Lmprimindo sempre no 
meson* lugar. 

Jd sabemos como Li dizer i: ' ao CP-20Q o qua de deve imprimir r 
mas precisamos, em dguns casos, inform&-1o tamb^m onde a 
mensagem ou o numeio deve ser impresso. 

Por isso a tela do seu televisor fei dividida em linhas e colon as, 
a bm de que pudlssemos ter um sistema de referenda p&ra a 
lmpressao. O CP-200 divide a Ida em 24 fifth as contendo, c&da 
uma h 32 colunas verticals. As finhas s5o niimerada& de 0 a 23 e as 
colunas de 0 a 31. Veja abatxo o esbogo da tela. O ponto de 
interrogate locallaado no esbo£Q est^ colocado na posi^o 24, 
respectlvamente, 3inha e coluna. 
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Primeitos Passos 


kso signifies qua o nosso ponio de interroga^o e$t£ 
posSdonado na eoluns de numero 24, dentre da iLnha 15. 

Uta-se a iios-iiu^ao- PRINT AT — PRENT seguida da lunfSo AT 
(teda Q — para dehnir o porvlo unde a impresiflo come^a Assim, 
para irnprimir o ponto die interroga^o do exernpb acirma, diyitcr 
PRINT AT 15, 24 : '■?" 

Deve-se entdnder essa men sagem eomo Tmprtma ns linha 15, 
colona 24, o ponto de Interrogate" 0 panto e vargtifa deve sempre 
ser eoiocsdo ap6s as coordenadas de impiessSo (Itnha e coluna). 

Essa pontua^ao serve para sepatai as coondenadas do conte udo a 
ser impresso. Podemos definir uma forma geral da i3usrra£So PRINT 
AT, como a que segue: 

PRINT AT linha, coluna: contetido 

Existem casos em que nao preesamos definir a Imha e a totana 
once a impressao Tcve come^ar. mas apena& a coluna, E o caso, 
pur example, da montagem de labelas, onde predsamos inn prims os 
valores dtspostos cm colunas previamente determlnadas. Nas 
mSquinas de escrever encontramos leclas de tabulate para esie fim. 

O CP-200 tamb4m possui uma fon^So de Tabulated dehnida 
par TAB (ted a F com cursor ?m a ). 0 mo6o de utLiza^o e o 
mesmo que foi usado para AT (teda C com cursor cm [Jj. Com a 
difetenfa de qua 1AB, n3o exige a introdu-g5o do numero de linha, 
puis a tabulate 4 reafoada sempre dentro da Jinha atual de 
Irtiptessao. Experiments a linha Imediara abaixo: 

PRINT TAB 10: "EXEMPLG" 



Tambem com TAB precteamcs usar o ponio a para 

separar as in formats sebre ontte imprimi [ociuna] da jafamagiQ 
sobre o que irnprimir ftnensagem ou ngmero). Se for usada uma 
irirgula para fazor essa separajSo, a fim#5o TAB implesnente n5o 
opera. Nesse caso, a tabulate 4 realizada pela vSrgula. 

Como a vtrgula pode tabular? 

Em uma ]nStru£ao PRINT, quando usamos vlrgulas para sepaiar 
valores ou mensagens a ser impresses, ccorre umna tabulate 
autom&tica para que nSo ocorra que sejam Impresses sem um 
espa^amento — O que tomaria dlfidl a leitura. 

Digite a linha: 

PRINT 1 + 1, 2 + 2 e pressicoe ENTER 
Na tela ser£ impresso: 
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A tabulate aulomdtica 4 i^eJgada sempra nas ooJtMias 0 e 16, 
o quti signifies quc. ^ usarmos uena in*ur;ac- PHiINT com vrguters 
para emprimir mass dt d*s valorem ou mensogsni. a sabeia^ao do 
tergeno ssiis ma colun a l 1 da .jnha segumte, e ass;:Ti por dianrr'e 

Como iJustra^ao, Introduce a litiha: 

PRINT l h 2, 3, 4 
Na tela aparecer6 


Note qua esfa caracjeristka do CP-200 permits a impressaa de 
vanos rlados com uma tinica I inha digttada Tanit esaa linha: 

PRINT "30'45=t” h 30’45, "DOfS AO OJBO -" t 2”3 
A tela ficara assm: 


Como voce pode ver t a labylagflo automatic a £ muito uiil para 
impresses mtikiplas-. por^m, □ formato na tela flea limitado a duas 
kinlc&s colunas. Quando pivcisamos de mgis coluna$ por tin ha, 
usamos ontro recurso: o panto e vfrguta, 

Impressao Multipla 

A separa^So de vakwes on rnensagens por portto e vigub em 
ums: tnsiru^So PRINT corn qve as -mpress-se* scam conseorrvas, 
sflm espago ds separav5o na leta Ejqpotmenic esse mcempb: 

PRINT a 30 ¥ 45 = ";30'4STDOlS AO CUBO - ";2**3 


i 5 aia meihorar o resuJlado anterior iratrodu&mos espagos enirr 
os valores e as meimgenti; 

PRINT '30M5 = ’;30M5;"VdO]£ AO CUBO - T2' '3 


O mesmo resukado pode ser consegufdo coiocando-se o espaco 
adKional dentro da men sagerrt, ov seua: 

PRINT “30*45 = B ;30*4ST DOIS AO CUBO - T2*'3 
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Pilmeiros Passos 


Resumo da Instmgao PRINT 

Faremoa agora uma breve recapitulate do que vtmos nesse 
capftub. Aprendemos que £ possivel fa^er o computador impnmtr 
rtumeros, mensagens, e q resultado de equals matem&tbas. 
Aprendemgs tambem que podemos definir a posit 0 onde a 
imphassao deve come^ar e como prcccder para tal Completando, 
verfficamos que o computadcrr pode imp™™ vSrias mensagens e/ou 
numeros com uma unfca instruto, combiriato v&rias caracteristicas. 

Retaclonamos abaixo vArios examples para fixar melhor os 
concertos. 

Exemplar 


PRINT 'MENSAGEtr 

imprime "MENSAGEM 

PRINT 2 

im prime 2 

PRINT 23 + 47 

im prime 70 

PRINT 23; 45; 67 

im prime 234567 

PRINT 23; H + ;45; u -';67 

smprime 23 + 45—67 

PRINT 23, 45, 67 

imprime 23 45 


PRINT TAB 20-23 imprime 23 a parti da coluna 20 

PRINT AT 17,2G;23 imprlme 23 a partii da coluna 20 

da llnha 17 


Fungoes Matematicas 


Alem das operates matematicas, o CP-200 apnesenta urn & 
sdrifi de FUNQOE3 intrinsecas que permitir<5o a voefi realizar os mats 
complexes cukulos aiitmcticas. 

Etas est,V> bcalizadas logo abaixo de cada led?, repress niadas 
sempre por sens nomes OU simbobs respective, 

Para imprlmi-Ja voefi deuera, primeLramente, pressonar as tedas 
SHIFT e ENTER (FUNCTION) simuEtaneamente:, esse procedimento 
mudarS o cursor para o modo a de operate r permitindo a voce 
digilar a fun to ecse^sda Uma vez inTroduzida a FON^AO. o curso 
voltarS paia o modo anterior (Q}. 

Daremos dbaixo uma relate das mais conhecitfas, mas voefr 
poderfi encontrar a lista completa de todas as PUNCHES deste 
computadoT no Apfedice A 

SGN x — Fujtg&o “sinal fomece — 1 para x negative, 0 paja x = 0 
+1 para x positive. 

ABS x — Fgmeoe o valor absolute op o modulo de forma que o 
resultado serii sempre um argumento positive. 

SIN x — Fcmece q seno do argumerrto (este deve ester em 
radianos) 


COS x — Rvrnece o cosseno do argumento {este deve ester em 
radianos) 

TAN x — Fornece a tengente do arguments (este deve ester em 
radiancs) 

ASN x — Fornece o arco’Seno do argumento (este deve ester em 
radtarios) 
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ACS x — Fomece o anco-cosseno do aigumento leste deve estar 
em radiancy} 

ATN x — Fomece o arco-tangenle do arguments teste deve eslm 
em radianos) 

LN x — Fomece o logaritmo natural [base e - 2,718281828) 
EXP x — Fornece a fun^ao exponential: {e* = 2.713...*) 

SQR x — Fomec^ a raiz quadrada 

I NT k — Fomece a represented intent do argument*. Este 
fun£*0 arredonda sempnz para ; [NT 4.7 = 4 
PI — * = 3,1415927 (PI n5o Lem argumcnlo) 

RND — Fomeoe urn nmnero qualquer aleatdrio) que 
denoTflinaremos RaNDdmico, 

Todas as FUN COES do CP-200 quando cm operaqao, devem 
obedticer a urn CrA<tbx> de prkmdade iveja o capi1ufo anterior) em 
que somente ' 4 perdetn' para as express&es enfre parersteses. 

NOTA: Embora a PUN^AO if (PI) matematlcarnente nao seja 
con$]derada Lima fun £ 10 , ele assufnlrd essa a caracterfelica no CP 
200 h por uma questSo de disposi^ao do teelado 



1. Imprima “CENTRO" 8 no centra da tela {Lemhne-se de que 
s£o 32 coJunas e 24 Lin has). 

PRINT AT 12 i 13i“CENTRO n 

2. Imprima "L[NHA UM’" na primeira lining, coluna 16. 

Isso pode ser felto de Lr£s formas; 

PRINT TAB 16.UNHA UM" ou 
PRINT TAB 8. ““UNHA UM" OO, atnda 
PRINT, 'UNHA UM" 

3. Imprima no comego da segunda linha, a mensagem 
"SEGUNDA LINHA", usando virgubs. 

PRINT,, “SEGUNDA LINHA” 

4. Imprima, no meio da segunda linha, a mensagem do 
exercicio anterior. 

PRINT,,, "SEGUNDA LINHA" 

5. Imprima "FIM" no canto inferior direito da tela, 

PRINT AT 21,29; “FIM’ h 

6. Imprima "NORTE" no centre da primeira linha, "SUL” no 
centra da ultima, ''OESTE" no infcio da linha central [12), e 
"(_£STE‘ no final da mesma linha 

PRINT AT 0,14, “NORTEL AT 21, 15; "SUL"; AT 12,0; "OESTE" 
AT 12,27; “LESTE" 


Programa^o Elemental' 


Programa^ao Elementar 


Voe£ >i dewe est&r bastanite famiftanrado com o uso da ans.!s utao 
PRINT em linhas imfldiatas. 

Como ja foi as linhas i mediates sac executadas as^im ljug 
a teda ENTER % acionada, e n30 ha cortlO execute-!ai trials de uma 
ycz. Para introdiizirmos linhas com instructs as quais o oomputador 
possa execttfar diversas vezessem "'esqijer^-Jas 11 , pretlsamos dc urr 
on tro tipo de linha; a (inha de programs. 


Pro^ramas Elementores 

A principal caracterMca de um eomputador e a due grande 
ueliQCidade na reafiza^o de cakulos ou lardas rolineiias. Trabalhos 
repetitivos e demorsdos podem ser programados em um 
computador para que este, toda vez eim due for necessario, execute, 
passe a passo. imia lists de tarefas pre-determinadas. 

Na jingtiagGm BASIC, e&labelecemos a seqtlGnda cartels de 
oxecugao quando adicionamos um ritimero as linhas de instru^ao. 
Essas linhas numeradas sao chamadas de linhas de programs, 
<omo foi visto no capftub I. 

Ao Lntroduzinno.s. uma linha de programa, o computadbr ira 
arrriazena-la na memoria e s6 a executant quando voce Ihe ordenar 
alraves ds inslru^ao RUN.' 

Faga o exempb a seguir: 

10 PRINT, "UN HA W ENTER 

Aparecera na tela: 




Note que a instru^ao nao foi executada, mas apenas copiada na 
primeira (inha da Ida. enquanto que na parte inferior da tela 
apareceu o cursor ra 

Diyite agora o seguinte; 

20 PRINT, ,1 L1NHA 20” 

A tela mudara para: 



, i, lxnma 10 m 
, ii l:i:nha 2o n 
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A segunda linba tamb£m nSo foi executada, *: agora uocfi tem 
duas linhas amtazenadas na momtiria com uma scqU&neia de 
execute defirtida. Digile RUN & ve)a o que atontece; 


As hob as foram sxeQUtadfiS a o eddigo de erro dignifies qua a 
ultima fenha «xgcutada fet a Ifaha 20 e nao bouve eno. 

Ran § uma palavra em ingles qoe signifies enrrer, tezer andm. 
Em ponugues dizemos rodar q programs ao inves do correr o 
programs, 

Daqul para a firente, dlremog simplesmente rodar o programs 
quando qulsermos. que voc% iostrua o computer para execut£-b 
(RUN) 

VOtlando As Itnhas do programs, £ necessArio csciaiecer alguns 
rfeiaihes importances: 

— Q nurnerc dc linba pode ser qtialquer rvuTnero inteiro entre 1 
e 9999i 

— 56 pode ser introdu^da uma instru^So por linha; 

— Nao ha limELe do compnmento de uma I in ha dc programs. 

As llnhas de programs n<b se limitam a Instru^fles PRINT, mas 
a todas as Lnstry^Ses do seu CP'20Q (veja no leclado). IremoB, 
pouco a pouco, dears vendo a aplica^a de cade instrusao. 

Fara a p:6xima bstruyflo abtrdada usaremgs novamente o 
exemplo do mb da circunfer^ncla. Voce esla lembrado da linba 
imcdiaia. 

PRINT C/(2’tf)? Pols bem, quando voce tentou introduar esta linba, 
ocorreu um erro, pels o eomputador n£o sabia qual em, o numero 
que voc£ queria dividr por 2 + ti. 

Em linguagem BASIC pode-se uidizzr letras on ale mesmo 
nomes para represents numeros, desde que se>a "db" ao 
eomputatior quanto uafe esse rrome ou terra. E$se valor aLriEyjcb e 
amnazena do em um lugar especial dentro da memdna RAM, o qual 
£ denomlnado variavel. 


^ 0/20 


tmm to 
linha 20 



Atribuindo Valores a Variaveis 


Para atribuiriTjos valores a variivess, em BASIC, u^amos a 
instiugAo LET. 

Se, por exemplo, qulsermos iazer C igual a 200, devemos 
digital: 

10‘LET C-200 

Esta Linha pode ser lld?i da seguinte maneira: com que C 

seja igual a 200”, Ap6s exccutar e5sa instru^o, tuda a vez em que o 
toroputadof for tiiilisar a vadAvel C., efe a '"etttendefA” como serbo o 
numsio 200 f at6 que aste valor seja aiterado 

Continuando com o cAlculo do raio da circunfer&ida, 
acrescenb as seguintes linhas para completar o programs: 

20 LET R = C/[2 p n) 

30 PRINT ”RAIO = ”;R 

Rode o programs intmduzindo a instrugSo HUN e ENTER. Na 
tela apareoera: 
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Frograma^ao Elemental 


Listagem e Alteragao de 

Programas 


Note qua na rnemona do computador, o programs de 
impresario de LIN HA 10 e LIN HA 20 > foi substitufdo pelo cSIculo do 
raid. 

Voce pode obter urn a listagem do programs que esta na 
mernOria usando a trisEiuc&o LIST- C-glte, a linha ifioediala:. 

LIST ENTER 

e o programa aparecera na teta da segulnte forma; 


Esta linguagem mostra qne as tin has: 10 PRINT, “LINHA 10" e 
£0 PRINT, “LIN HA 20" foram suLstituIdos. respectfvamente, pel as 
linhasr 

10 LET C - 200 e 20 LET R - C/[2'n) 

Isso £ feito automaticamente, jo se digitar unu Lin ha de 
programs O conleudo da nova Sirsha substitui p da antenor. Tenle, 
por exemplo, iniroduzir o seguinlc 
20 ENTER 

A tela mudar£ para: 


A .inha £0 desapareceu, q que sgndka, que podemos apa^ar 
linhss de program a apenas digitando o numero da linha e ENTER. 
Ne&se caso. voce esla substituindo uima linha por outra que, na 
real Id ad e, nao possul conteudo algum. 

Outra format de se alterar o conte udo de uma imha de 
programa e conrtoirido diretamer'e o texto, sem a necessdade de 
digitar novamentc a linha. 

O CP-200 possui ums fungSO que permits rasa cocregfio de 
llnhes introduifd&B: & a instrugao EDIT, Em programaefio 
chamamos a essar; correQoes eclis'S'D de programa. Como 
tlusiragao '/amos alterar a linha 30 do programs que esti na 
mentiSrtfu Para Santo, utilize as !*c!ris } e \ at£ que o cursor fcque 
tocaliaado a frenle da linha 30, coino abaixo: 
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Press Lone agora as tecbs SHIFT a EDIT (tecta 1) 
simultaneamente e a iLnha 30 mt 5 eoptada na parte inferior da tela. 
jarUnmente com p cursor para que sejani efetuadas as alterafOes 
necey&rfes: 


O quo queremos 6 qua o programs imprima a mensagem 
RA 10 “ sqguida do valor catculado para o rare. Para 5 sso devemos 
f&zar o computador imprimir o resultado da sente n. fa C/( 2 * 7 t ) 1 
cnt 3 o, a I in ha 30 deve ficar; 

30 PRINT “RAiO-’^C/^ir) 

Scr& necossino, antso, destocar o cursor para a diieita ate o 
final da linha e deleter a uariavel R, pois da nSo sera mais 
necessdria, 

30 PRINT ^RAI0- m ;RB 

Acione DELEFE (lemhre-se do terceiro capftulo) 

30 PRLNT “RAIQ - ” Q 

Digite agora a fdrmula coircta; 

30 PRINT "RAIO-":C/(2'7r) B 

Com a Ijnha oomgida (editada), basta presstonar ENTER q qla 
retomar£ ao mu tugar, no alto da te!a h aiterando o to nteudo 
anterior. 




Execute o programs (RUN ENTER); a tela deve ficar assim: 
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Programs9a o Elemental 


Para melhorar o programs, podemos fazs>r corn que o CP-200 
tambem o com prim enta da rircunfer£nda tela. A 
S&s£tj^5o necess&ria nesv casO e: 

PRINT -C1RCLINFERENCA -'*;C 

For uma questSo de l6gfco matemairea, ja quo prlmeiro 
defnimos o oomprimanto da citcunfer^nda antes do cdcular o raio, 
sera bom quo pudessemos Imprimir primeiro a variavel C, para 
cepcEs irnprlmlr o valor do raio fvariavel R) Com esse Intuito 
<3evemos escolher o numero do linha de mode quo a vart£vel C seja 
impress depots de receber urr: valor (LET C = 2001 a antes da 
anpress5o do resuhado final iPREKT "RAIQ = AneJrsando o 

fnagrama, vemos qus os numcros de linha s5o iO e 30, pcrianlo, 
podemps usar quatquer ntimero inteiro erttre esses dels {11, 

32,..,£8,29) Escolhemos o numero 20. Entao digits: 

20 PRINT “GIRCUNFERIiNClA = ”;C 
Execute o programa; 


Re&umLndo, para editar uma linha de prograTna voce deve: 

— Utillzar as setas t e j para posicionar o cursor na llriha a ser, 
alterada; 

— FVessione SHIFT e EDIT (tecla 1) para que a linha seja 
copiada na parte Inferior da tela; 

— Utilaar as setas -*■« +- para poscionar o cuisor a (rente do 
texto a ser eBmlnado (DELATE} on no ponto on.de voce pretende 
intiodiw infc>rmaf3o; 

— Ao terminar a edigfio da linha, fa^a gma rninuclosa 
verificaijfto no texto definitivo* Oonfirmado o lexto, pressione 
ENTER, o que Entroduzir& a linha na memtfria colocando o novo 
texto; 

— CadO voc% queira qu.e as aliera^Oes reaiizadas em uma i±iha 
n3o se;am considerada^ pelo computador. pressxxie EDTT 
novamente e a linha Original ser^ copiada novamente. Esse 
pnocedimento deve ser realisado antes de se introduzir as aherag&es 
(ENTER), poLs isso modifies^ a linha armazenada, 



Mais sobre Variaveis 

Como ;a foi dito, as vanaveis podem armazenar (represents) 
quaEq-gcr valor, desde que a^oclem.vaJores a nomes. Isso permits 
que chamemos pelo numc da vari&vel, todta vez em que for 
necessto represents urn valor. Com as insfrugtes que vemos ale 
aquL tomihse muito trahalhoso aherar cs valorem de uma dada 
varied, pois terfamos que tciodifLcar a instru^So IE]' toda vez que 
urn novo valor fosse usado C) ideal seda urea instruc&ci qua 
permitisse a de vaJorfes sam precisar alterar q programa 

INPETl' 4 a resposta. Input err. portugu&s signified inttoduzir e c 
exatamente isso que o compulador espeia que se)a reaitaado ao 
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executor essa instm^&o: ele aguarda que imroduzido uni valor e 
o cdocara ern uma vanAuel esperificada na inirtrut&o, 

Como isso £ teite? Ve^a no exemplo abatxo 
10 INPUT C 

Ao executor essa tmha, o CP-200 it 6 parai o pttxe$»imenk>, 
e&perando que seje fntroduzjdo am valor num£neo. Na part? inferior 
da tel a apareoet£ o cursor Jfl indicando que deve ser Feita a 
introdug5,o de letras ou, no ta$O n numerofi. Vejamos eo-mo l$so 
fuAdon* oa pratica; 

D^te c 

10 INPUT# (ENTER) 

Na :e1a aparecerA 


Rode o program*. ApuSs voce pressfotar RUN ENTER, a leta 
ficarA asiiin. 



£ essa tndica£3o que petmire que voce dbgst* um vabr que sera 
atr.buSdo a vart&vd C Dkgite um valor qualqui'r, coma per exempk> 
100 ENTER 

Depois disso, q comput&dor completarfi o programs da forma 
normal, Imprimindo o valor Introduzido e. abalxo dele, o resultiido. 



r 


ClRCUNFERENCIA=iO0 
RAID *=15.91&i*94 
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Progmmacao Elemental 


Note que voc£ pode introduzir um novo nOmero, para canto 
basis rodar o programs novamente. Tente agora, intioduando o 
"urnefo 63 r por exemplo: 

RUN 

63 ENTER . 


Jsso pode set repetido quantas yeses Ion' necessario. Dato nome 
worfovef, pols o conteudo de Lima variavel pode ser mudado a 
goal oner cnutnento. 

Ate aqul nemos usadn names de varifiveLs com apenas uma letra 
(C e R) 

Porern, os names de v a navels numericas podem ter qualquer 

compriinento 

Para continue:, uamos introduce um novo programs no CP- 
200. Desta vatnos appear o programs r 4 ue e&la na memoria e 
digitar, ftrthii a lintia, o novo programs 

Quando quisermos apagar urn. programs de mem6na t tiSo basla 
apenai digital CLS fveja no capftulo 3),. para eliminS-lo. Tents este 
comando; 

CLS ENTER 

O progtarnu desaparecer^i da tela, pordm, se voc£ pressionar 
ENTER, o programs retornara novamente aO video. Isso Indies que 
esse comando n£o serve para di miner o program* da memdria. 

Em BASIC, qvando quersmos inrroduzir um novc programs, 
ao nnesm? tempo cm que se apaga O antigo, usanvos a injtJU£ao 
NEW move. «m ingles). Digite: 

NEW ENTER 

Verdique agora. pre&sionando ENTER, se o programs ainda 
estii n.a mem&Tia, 

N3o apamcer^ nada na parte superior da :ela. indrando que 
n;ao programs algum na memdria. A Enstrugao NEW serve para 
apagar o program a da memdria, Jiberando e space para nows 
programas. Apds a execu^cto dessa instruqao, o cursor aparecesS no 
modo K . 

Mas, vamos ao novo programs Ei-to ababco: 

10 INPUT A 
20 INPUT B 

30 LET MEDIA- [A + Bl/2 
40 PRINT'MEDIA = M . MEDIA 

Esse pmgTama pede a introdugao de dois numeros e calcula a 
media ariljnetica entre eles. Note que usainos a palavra MEDIA para 
defin tr um valor numerico. As variaueis que rapresentam ualores 
numeiLcos s5o denominadas varidveis numdricas. Mais a frente 
veremos outros tipoa de vaii^veis. 

As vari^veis possuem alguns recursos ^specials quando usedas 
na Lnsttu^ao LET. Veja o exemplo;. 

LET A-A + S 

Nessc caso, a variavel de name A aparece duas vezes em uma 
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finlca instru^ao, Ejaa insriucao £ executada da Sftguinte rnaneira: «m 
piinoffco lugar, o CP-200 soma os uaJores de A e 0 e* entao, cefoca 
o fesdtftdo na vart&ud A, novamente* 

0 nom.fi dfi ama varied numeric* pods ter qudquer cornprimenio e 
combi na^So de letias fi numeros, porem dever^ Kmpre comecar por 
uma Jetoi, 

Aba wo mchtramOi urna lista de nomes validos para variants e 


uma ouira com nomes ilcois 
VAIIdo^ 

llegais 

A 

A* 

MEDIA 

MEDIA: 

ETEMOl 

ITEM-1 

XO 

OX 

MES 12 

12 


Apfi^ da possible ad e de utilear-se nomcs kmgos, dev&mos 
dar ptdorfiocia a nomes curios f simples Lembte s* oe crjs quanlo 
mfinor for o nonte uriltfado* menoi sfiii a possibSidade de erro e 
rjicnor o fispa^o quo a variivd onipara na Tnem 6 :rla [sim. pens o 
norm? tambem £ armaaenado). 


Urn a car act cite ica das variSvets s que das n*o se bmftam a 
amwfinar nunnros. Silas tambem podem armasenar mensagens 
literals, como nonrn?s enderesos, observances. etc Em program^o, 
exists urn termo especial para meriKagens literals. Este termo k sJrrrig. 
Um tiring e uma sequencia de caractcrcs sem slgnificado mateiruMteo 
para o compulador, rnas com urn tignilicado literal para o operator 

As vaiiiwss arm azenam aperias um tipo dfi inJarma^eSo: 
numeuca ou string 

Para diferenciar uma vaiicivd numerics de uma vari£vd string 
usnmos colocar o si rial Js dfr5o (f) apos o nome das vari&veta string. 

O CP-20Q aotfa nomes de varfiveis string com apenas um 
cafftctcrfi d« componwnio Abaixo estao alguns nom.ts vafidos para 
variAvds smoc 

At XS Ci 

Vamos a um axemplo para tixar mdhor estas tnfoima£5e$ 4 Para 
pagar o programs da memona, jumiamente com ?odas as 
irtlbTmaflbes'ajmaffinadfts, podamc* simpiesmente presstonar as dvas 
iecli, c RESET ao rruasmo tempo Essas tedas lazem com que o 
computador esqufiga tudo o que eitA armasfinado c reegmece sua$ 
operates ccrr>o sc tfsfivssse sfindo ligadc fiaqufise instarde. 

Com o compute dot iriscializadOi djgite o seguinte progioma: 

10 PRINT “DIGITE UMA ERASE" 

20 INPUT 

X\ PRINT "ESTA E A MENSAGEM " ; A| 

Rode-o fi ntroduia yma frasc qi-iaiq!uer, tomo 'COMPUTAEJOR 
PESSOAL CP-200 

TX’pod$ de prcsslonar ENTER, o computador coloeara na tels: 





Prograrna^ao Elementar 



Nota : ENTER deve set pressiorado apos as dig.i^Ges. para que o 
CP-200 remit; o piocessamenlo. 

1. Elabore urn programs que conuerta graus Fahrenheit em 
•gratis Celsius. 

Solute) propoEta: 

10 INPUT F 

20 LET C 5* (F—32J/9 
30 PRINT F 

2. Rode o programs do prirneiio exeirfcio e raicgie a 
lemperatura eqgsvatente a; 

a. 59 grans Fahrenheit 

b, 7" graus F 

c O ponto de fus^o da dgua (32°F) 

d. O ponto de ebuli^ao da agua (212°F) 

As resposras devem ser r respectiyamende: 

a. 15°C 

b. 25»C 

c. 0°C 

d. 100 a C 

Nesia questSo sabemos que tlpo de infmmactSo devemos digitar 
quando o eomputador para a exetupao a espera de notos dados. 
Qtiando iLdamos com programed mais sofisticados. n&o queremos 
que o computaicr apena$ pate a execu^So. mas que indie tie o dpo 
de informal que deve ser inlroduado. [sso pode set reaflaado por 
umg jnstrucfio PRINT imedialamenle antes a INPUT 

3. Indus upna linha com INPUT no promama de converSSa 
para indicat a, introduce da lemparatgra correta. Para obter uma 
Eistagem do prqgrama a partir de um resultado da tela, simptesmente 
presiione ENTER. 

Voofi pads adteionar Lima linha como a seggirite: 

5 PRINT "PROXIMO VALOR EM GRAUS CENT 1GRAOO$* 

4. Qual a diferen^a e a sm'nelhanca entre a msiTuffio CLS, a 
instru^ao NEW e a recta RESET. 

Serneihangai Todas limpam a tela. 

Difercnsas: CLS apaga apenas a tela, 

NEW apaga a tela e os program as rta Tnemdria; 
RESET apaga todas as infonmaques do compu.tador, 
fazendci’O reinictar sua opera^So 

5. El^bore um program* que &s seggimes tarefas: 

a) Petmita a inttodutuo do nome da cidade e da Temperature 
local em °F: 
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bl Cakule a ternpef^wa giaus CAftffyadkis; 

c} Imprima, com identibtra&flo. o nomc da cidade s a 
lempeiatura local, em gratis cenljgrados 


Solu^So proposta 

10 PRINT "QEJAL CtDADET 
20 INPUT C* 

30 PRINT QUAL A TEMPERATURA IFAHR.]?" 

^oinputtf . 

50 LET TC = 5' (TF 321/9 

60 PRINT “EM"; CT;V;TCfgRAU5 CELSIUS'* 

6. E^crewa um programs que cakuk a aeonomia de um 
automdve]. Para isso, ete dew: 

a) aoetar a jnliodu0t> d< J quantos quUAmetira (-cram 
perconidos; 

Li) pedlr a InformafSo de quantos litroe foram gostos nesse 
percurso. 

c) pedii a jntroau^o do pie^o per liEo de cotinbustivd; 

d) pedtr, por fim. o tipo de combuslivd asado (gasotna, i I cool, 
dteaeQ; 

e) cafctjiar: 

— o consume (em Km/0 e 

— o cuao {em CrJ/KmJ 

fj imprlmir as seguing Lnlomrsa^es: 

— A. quilometragem peroonidau 
— O loiai gasto de combust Evd, 

— O consumo no porcurso, 

— O custo por qullomelro. 

$olu^3o sugerida: 

10 PRINT “DIGTTE A QUILOM ETRAGENT 
20 INPUT KM 

30 PRINT 1 QUANTOS LITRCS?" 

40 INPUT LT 

50 PRINT GUSTO POR LiTROT’ 

60 INPUT GUSTO 

70 PRINT "QUAL COMBUSTIVEL^' 

80 INPUT CS 

90 PRINT J ORAM PERCORRTDQS": KM, "KM" 

100 PRINT TORAM GASTOS M : LT; "L1TROS DE’; C$ 

110 PRINT "CONSUMO - KM/LT; "KM/L 13 
120 PRINT "GUSTO = CR$" ; iLT*CUSTO)/KM: H ?Ofi KM' 
Note qua a solu;&o propojta & aperies uma das multas 
uan-a^es pyistveis da r<?spo$ta Voce dew teettar etabmai outds 
solugita para os problemas proposio^ Eteva forma, estari 
exeioiando os conhedmentos adquiddos 


Computa^ao Basics 


Computa^ao Basica 


ConioTTTie vimos no capiiulo anterior, ha dois tipo^ cil&tiinics de 
variA^eEs: a* numemros e as strings. Em BASIC, pode-.se realizar 
certas operates com strings, assim ramo colocar uma lisia de 
nomes em Oidem alfdoeiica Ou monlar bases a panii da 
concatenates de vdrios strings, 



Foi vista ainria qua as vaiia veis siring pcxfem ser cobcadas em 
instructs de atribuicjo (LET] ou dq mtrodu^o i INPUT, 1 Ci mesrr’ia 
forma que as numencas. 

Quandt? num programs qatiremos processor diverts valorem, 
torna-se netessario dotar essO programs de reeur&os de taE forma 
que, arxb aptKMenrar m result ados, ek lome a pedir urn novo valor 
pciTa calcuto. taso s6 sera po$$fvel se o programs for repeiido tarn as 
verges quanta? fore til necessSrlas. 

Ate aqu: para eada novo calcitlo. usavainos digita* RUM 
ENTER para execulat todo o programs novamerite. 

Para resolver tipo do probtema, o BASIC do seu CP-200 
possui uma instru^ao chamada GOTO [em portugu&s. “"It para "l Ao 
executar essa Lnstrtttao, o CP-200 passa a realise as iEistru^des a 
partir da llnha cujo numero c indicado na insftut&o GOTO. 

Exemplo: 

100 G OTO 10 

Nesse caso , o computador, apo? executai a I in ha rmmero 100, 
pa 3 $ar£ a qxecutar a tin ha numeno 10, e assim suoesslvamente. 

Towieinos como exsmpta uma versao simpliftcada do program a 
de temperatuta do exencicto 3 do capri ulo anterior: 


10 INPUT Oft 
20 INPUT F 

30 LET 0 5'ff=-32}/5 
40 PRINT C£,C 
50 GOTO 10 



37 





Note que usamos n^sse exemplo duas vari£veis com o mcemo 
name: C e CS, No entartfo, eias sSo diferenciadas pcEo tipo de dado 
qua cooiem. O tifr&o. assim, serve para defmir uma rvova v&r^vel — 
a qua! denominamo* C$, 

Observe lambfrm que cada urns ddas sefS arTStaaefiada am 
locate diferentes da rnem&ria. 

Quito detolhe importante; quando o compytador para a espera 
de um string, na tela apareceri a cursor H entre aspas ("H J 

O programs atima e executedo da seguinte forma: 

— Na linha 10 o ccmputador espera por urn nome a ser 
amnaacnado na van&vel string, que £ C$. 

— Na linha 20 de aguarda a Liiboducso de urn numero a 
atiribuSdo a vartfivel F; 

— Na Mnha 30 i reaJizada a eonuersao de grous Fahrenheit para, 
Cdsiui 

0 resultado e atrlbuido 3 vanaveJ C; 

Na iinha 40 s3o impresses o name da Joeoftdada e o 
result ado em gram Celsius: 

Rnatmente, na Itnha SO ocprre ym desvto da programa^Ao 
que fa* com qyp o computador volte a execuNir a Lnha 10 r 
recomeca^do o programd 

Dfcssa mantra, o programs praticamente nto ier£ fim, pols, a 
C&d<j inirodu^ao, o computadar vgJta a repehr o programs. Etiae 
processes cfcEico £ charnado, em pfQgramagto, de loop. 

Um loop k um bfteho de programs repetsiivo q^e o compyjodw 
exc :utara are que receba orders para para? 


Como podemos fizer nosso programs parar? 

Em BASIC usamos o comando STOP (wda A} para dazr ao 
tompulsdor que deue parar a e*ecu£Ao pe ym programs, 

Aiencflof Voc£ dev® introdudr o comando STOP e n^o digital 

0 ^ let™: S-T O F, 

rente parar o programs com o comando STOP durante a 
introduce do nome da cidade. Na fda. o cursor astara assn; " L r " 
$e voefi sdmpk&mejde pnessionar STOP ENTER, o computadot 
oon^derara que foi introduado o noofte STOP para a cidade # 
imprtmira normatmente, continuando o programa, 

Tenie fazer o programa parar da seguinte forma; 

HUN ENTER 

STOP ENTER (NSo se esque^a de pmsakmar Shsfi e A para o 
comando STOP}. 

Na leta, com o cursor 


Computa ^ 0 Basica 


V<>;a F o compui.ador inteiprelou que, na cidade STOP, a 
tempeTblura estava em zero grausf lsso porque voce introduziu q 
corn an do STOP entre aspase, por isso, ele fol considered© como 
um string. Para evitar esses problemas, vOC£ dever£ eliminai a 
primelra aspa com o eomando DELETE, da seguinte forma; 

Com o cursor il O M rta tda, digits: 

SHFT DELETE 
SHEET STOP ENTER 

Q programs £ paraJisado e a computador fica esperendo psb 
pr^ptio passo a ser dado: cgntinuar com o programs ou abandon&- 
!©. Para owtmuar com o program a deve-3£ usar a instmgso CONT 
[lecla C) s^guida de ENTER. 

A insiiu^o CONT iimpa a tela e retoma © processameoto na 
lmh;a mdioada pelo oddigo de err© 5e a I in ha indicada contiuer a 
instrut&o STOP, o processamento continual da prdxima linha de 
programs, No caso do programa de temperatures, a retomada se 
dar& cum o computador pedindo a introdu^o da temperature em 
graus Fahrenheit. 

Para se abandonar um programa apos um STOP, basia 
pressionar ENTER e o CP-200 responds rfi com uma listagem do 
programa na tela. 

Dar-emos agora um resumo das manetras peJas quais um 
programa pode ter seu. processamento inleitompid-o: 

— A qualifier momcnto 

Presslone as duas tedas RESET ao mesmo tempo Dessa 
forma, 0 computador perdera todas as informagGes da memorias, 
necome^ando a operar como se estivesae send© ligado naquele 
momenta, 

— Enquarito espera por utna introduqilo numerica ou de string 

STOP e ENTER, Esse procedimentc pemute a retomada de 
proces^mento. 

— Quango a tela stiver replete 

O computador p&ra automatitamente quando iteo houver mai$ 
espai?o para oolocagSo de dados no video. CONT limparS a tela e 
retomiu'6 o processamento. 

— Durante o processamento (n3o e esperada uma introdu^ol 


BREAK (teela de espago) opera de modo similar a STOP. 
Mais a Frente voce aprandera a fazcr a programa parar por a 
propiir: Por enquania. devemos nos p:eocupar com o modo pek> 
qual os dados e&tao sendo apresentados na tela 

Rrxie o piograma iniroduDfido o nome de aigumas cidades e 
rfisp&CtW&S temperatures locaus como, por e^mplo: 

RIO 90°F: MANAUS 11Q°F; PORTO ALEGRE 70 & F 
A tabela resultante tete algo parecida com: 
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Para mfllhorar a apresentagflo seria convenient^ colocai um 
cabt^alho para d*.-finlr o confetido de eada coluna, Sugenmos -i 
seguinte linha 

5 PRINT “LOCADDADE"; TAB 16; “GRAUS CELSIUS" 

Para intiodu.nr essa linha. pare o programa uusando STOP, 
prcsiione ENTER v na teb a litfagem do programa, Dtgite, 
ent3o, a linha 5 t lerminando por ENTER e rode novamente o 
programs, rcpeli rido os valorem 

Voce obterA resukadg na tela: 


A linha 6 sar^ exetutada apeha:* no comedo do programs, 
formando o C&bcqdho. Ap6s a Impressfto na Itnha 40, o compulador 
relomarfi £ fcnha 10, pedindo urn novo ttome A linha 5. portanto. 
n5o faz parte do loop 

Uma outta melhona no program a seria a mdica^So de que dado 
§ csperado peb compuiadoT quando aparece o cursor 0 na leb 
Para isso devemos aoescentar duas Untias antes das duas intfrugOet 
de introdu^ao. Suqenmos: 

S PRINT AT 21,0TQUAL LOCALtDADET 
IS PRINT AT 2l f 0,"QUAL A TEMP FAHR?" 

O program^ final ffcara: 

5 PRINT "LOCAL!DADE”; TAB 16; “GRADS CELSIUS” 

8 PRINT "QUAL. A LOCAUDADE? 

10 INPUT Cl 

18 PRINT L 'QUAL TEMP. (FAHR) T 

20 INPUT F 

30 LET C" 5 * IF 32 }/9 

40 PRINT C$,C 

50 GOTO 10 

Rode q programa (RUN ENTERS. O CP-200 perguitiarS: 



(3RAUB CELSIUS 

152 

43 

21 


LOCAL IDADE GRADS CELSIUS 


Depois de introduzkio o local, aparecerS; 


OUAL A LOCALIDADE? 

B' 



Agora vqc & jS tern um programs, que fomcce um resuJlado 
tabelado e que pod*' ser utilizado mais tarde, qua ndo former testiu 
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riovci;- taraetenslicas do CP-200. Dapols de ten to trabalho na 

desse esceicido h seria bom que pudes&ernos guarda-b em 
algum tugar de onde pudfessmos tomar a copia-lo quando 
neo^ssirio, &em a necessidade de uma, nova diglta^as. Uma tils 
easseJfc e o lucjar ideal. 



Utiliza^ao defita cassete. Como 
Arquivo de Programas e Dados 

0 CP-200, mediants <t utilLidagiio de yrauadofes, permite 
amiajenamfinto de informapOeSj tais come programas, variaveis e 
certos paramefros internes do microprocessador «m fitas cassete. 

dstas informag&es poderio, uma vea gravidas* serein mantidas 
por tempo irndgtertnfcddo. formando um arquuvo de programas e 
dadc>& para d ramputedc*. 
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A. tonex^o do gravador ao CP’2G0 & feita. atraves de dois eabos 
de liga^ao que vem jun laments coin o eomputador. 

Conectc um doles & to mad a MIC do CP-200 parte de tr£s) e a 
toinada MIC do gravadoi Outro deve ser conectadO &. lomada EAR 
do GP-200 a a Jornada de mesmo nome do gravador (ou a tomada 
MONITOR) 

Aten^ao: Cuidado para nao inverter as ligacoes dos dois cabos. 


GRAVADQR 


EAR 


MIC 


COMPUTADOR 


'EAR 


MIC 


Ciide para qua nfto sejam invartidos os cabos h pci.?., nesse caso. 
il 3o sera possivel opera r com o gravador. 

Voc£ provavelmentc 5ra salvar fgrovar para usO posterior) 
muitos dos pTogramas utlliiados. I550 quer dizer quo voce vat praclsar 
klcntlficar cad a um dales saparadannente F Eanto rta fita quanto na 
prdpris Kstagem do programs. 

A coloca^o da frases explicalivas dentro do texto de um 
program® exige uma nova instm^ao: REM (abrevlalura de REMark; 
ern portygues, comenl^rio) Essa in£trug5o fa z com que o 
computador ignore o res;ante da linha de program®, fieando esse 
lexto com signifieado merannente 1 11 era]. 

O nosso program a de temperatures pode ser iriemificado com a 
linha: 

1 REM 'TEMPERATURA" 

Para salvai 0 programs podemos usar esse iStulo juntameirte 
com outra inslru-cSo : SAVE 

Essa instrugao faz com que o programs seja gravado em fita 
cossete, desdc que 0 gravacbr esteja devidamente conectado, 

A instrufao SAVE e usada jun laments com 0 nome que damas 
<10 programs atravSs da insfrugao REM Veja o exemplo: 

SAVE “TEMPERATURA" 

Note que a hstru^SO SAVE deve ser usada em linhas imedialas. 
Sc-a utilizarmos em linhas de program®, cada vez em que o mesrno 
for executado. essa Inslru^ao fara corn que o progs uma seja gravado 
rsovamente — o que e desnecess&io. 

Na pr^tica podemos colocar uma instru£&o REM em qualquer 
ponto do prngrama, 011 ainda, inclut-la dtversas vszes 00 decorrer da 
programa<;5o; nesse caso, cada uma delas identiftcara uma parte 
distirtta do program®. Veja o exemplo; 

1 REM “TEMPERATURA W 

5 PRINT H L0CAL1DADE”; TAB 16, f 'GRAUS FAHR" 

8 PRINT AT 21,0; ,l QUAL LQCAUDADE?” 

10 INPUT C® 

18 PRINT ”QUAL TEMP tFAHR.)? - 
20 iNPUTF 

25 REM * * * CON VERS AO * * * 

30 LETC - 5*{F—3£)/9 
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35 REM"'SAIDA 
40 PRINT C$,C 
45 REM"' RETORNO"* 

50 GOTO 5 

Para a localiza^&j de um program a na fita d convenienta gravar 
ums mensagem lalada antes de grauar o programs propriamente 
dito. Fortanto, antes de executar a Instrucao SAVE, fale o nome do 
programs no microfone, gravando assim uma tdentificacSo posit]va 
do programs. 



Lirvivjfc. "Marti" 
do- r*?ra* Ob 


Digits: SAVE 'TEMPERA.TURA", mas nSo pressione ENTER 
ainda. 

Coloque seu gravador no modo de grauagSo (pressione 
RECORD e PLAY) e, feltn issq, voce deuera pressfamar ENTER. 
Havera gm intervale de aproKlmadamente cliico segundos, durante 
os quais nada aparecer^ na tele. 

A gravag£o inicia-se quando villas feixas aparecerem na tela. 

Finalmente, ap6s a gravacfio, a tela voltar£ ao normal com o 
cddigo 0/0 em sen canto inferior esquercto, Indicando o fim da 
gravagSo. 

Agora, voce pode deshgar o gravador. 

Colocamos um resumo do processo da gravagao de programas 
em Da 

1. Nome do Programs (REM); 

2. Prepare uma Da virgem ou uma que po^sa $er regravada; 

3. Grave o r,ome do program a atraves do mkrofone: 

4. Conecte o grevador ao CP-200: 

5. Digite: 

SAVE 1 Si Dine do programs’' (n5o pressaone EjNTER ainda); 

6. Coloque q gvavador para gtavar; 

7. Pressione ENTER; 

S. Quando apaiecer 0/0 na tela, pare q gravador, 

Aconselhamos oUwlr a fit* para certificar-se da grava^So. 

DesJigue os cabos de conex&o, voice a fita e coloque o gravador paia 
tocar de maneira normal. 

Voce deve ouvir sua priprla uo 2 Identificando o programa, 
Depois disso, voce OUVllr^ uni rufcks refersnte ao mouimento da fita 
antes de se pressionar ENTER. Em seguida, haver£ cinco segundos 
de sit&ncio. EntSo, ser# ouvld.0 um forte rufdo correspondents hs 
faixas na tela, saguido do rufdo Inldal Aitermina a grava^ao. 

Se apds a grava^5o da sua vo 2 u£io houver os ruidos descritos, 
provavelmente a grauagSo n^o surtiu efelto. Tente novamente,. mas 
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antes veriftque se as conexOes esiSo corretas. Em aSguos grava doies 
&6 e posstvel gravor com o caba EAR desronctiado, per L^so retire 
esse eabo d a lomada de sell grauadcr paTd fazer a tentative. Outran 
causas pod-em s^r sujeira na cabe^a de gravagao, Hta ruim, etc. 

Agora vamos copier um program a da fits para a memorja do 
CP-200. 

Abaixo rnostratnos um resumo de gomo proceder para reaJizar 
essa operate* 

1. Posiclcne a flta rta parte onde foi gravado o programs - Para 
isso baseie se na gravagao da sua voz anunciando o programa. 

2 Venfique s-e o sequete EAR conuenientemente 
conectado ao soquete correspondents do grauador. 

3. AjUSlfi o volume do gjavador pcsta quartos do maxima. 

A, Ajusle o controls de lonaSidadts, fagendo com que os agudos 
sejam refoigados. 

5 Dicjite; LOAD lt nome do programa" 1 2 3 (Nso pre&stone ENTER 
ainda) 

6, Liflue o gravaddrr 

7 Fressione ENTER 

Se q program a for carregado (copiado) corretamente, voce ver5 
Lima s£rle cle faixas tia tela. Ao terminar o canegamento, aparecera 
o oodigo 0/0 iridtcando que a operate foi bem sucedtda. Caso esse 
codigo n£o apareca apds sumirem as faixas da teia & provavel que 
voed ten-ha dhg:3ado o name emado, e o computador caridinuaia 
lendo na fit a ate encontrar. Nesse caso voc£ dev£ tenter novaroerrte, 

O maior problems para se carregsr urn programs gtavado em 
fila e o ajuste torreto do volume. O ajuste conelo permire que o CP 
200 conhe£a o-s sinals gravados sem d3$lor<;ao. O nivel depen de das 
caracterfsticas particulares do grave dor usudo e deve ser determjnado 
por voc£ mesmo> 

$e voed sa esquecer do ngme do programa -ou quiser canregar o 
primelro que estjver na flta. stmpiesmente dkpte: 

LOAD H ”‘ sem colocar nada enere as aspos 



1, Repita o programa de cilculo do raio (capKulo trSs) adiclonando: 
a} tabulac^o de resuhados; 

b] um tflulo; 

c) urn loop que tome necessario apenai uma introdugao da 
instrug5o RUN. 

2, Rode o programa usando valores quaisquer 

3, Grave o programa em frta t utilizando O titub como nome do 
programa NSo se esquega de verificar se o progtaina foi gravado 





Computa£2L° Basica 


realrnente, O programs deve ficar como a listado abaiKo: 

1 REM "RAIO 1 '' 

5 PRINT ’CSRCUNFERENCLAVRAIO” 

10 INPUT C 
20 PRINT C, C/[2"ff) 

30 GOTO 10 

4. Escreva urn programs que [mprlma todos os numeros que 
couherem na tela .'l^ujibre-se de que o programs p£ta 
automatic amenie so preeridier a tda. 

So/tifoo proposfo 

5 LET N - 2 

10 PRINT N, 

20 LET N = N + 2 
30 GOTO 10 

Ao rodar o program a aama havera uma certu demora para 
aparecer algo na tela. Isso $e dew ao fate de o CP -200 ester 
execurando urn hop que n&o cantem nenhutna instru^So de parada 
{INPUT por exempb}. E!e so vaa pare* quando n5o houver mais 
iugar na ie-la onde imprimir Nesse ponlcv ocorrera urn eno de cod 130 
5 (wj£i apertdice com os CodtgoS de Erro} na linha 10. 

Um detalbe importance desse programs £ a virgula final na linha 
10 fissa vungulii fa ?. com que o proximo valor a ser impresso seja 
cabulado automaticaiTiorite. Desw forma, a proxima mstrucao PRIN'i 
sertl e*ecurada a partir da proximo nwia lela {veja “Como a vfrgula 
pode Labular?'' no Cspftub IV), 

5 Adicione no programs da questao anterior a seguinte linha e 
tente untender sen significado rodando o programs. 

23 PAUSE 60 

No proximo eapitub voce encontrai^ uma explica^So delaihads 
dessa instru^ao, 

6 Baseando-sa no exerricio 6 do eapTtulo anterior, tente 
elabnrar um programs que: 

— fomeca o montenle gaslo com 0 combustfvei; 

— cskute'a economic de combustlvd em Km/l T 3p6$ vsibs 
aba$redmeft(OS. 

Sob^ao proposta 


5 LET P = 0 

6 LET L = 0 

10 PRINT ■’DIGUE A QUILOMETRAGEM" 

20 INPUT KM 

30 PRINT “QUANTOS EUROS?” 

40 INPUT LT 

50 PRINT "GUSTO FOR LITRO? ,h 
60 INPUT GUSTO 
70 PRINT *QUAL COMBUSTTVEL T 
80 INPUT CS 
S5 CIS 

90 PRINT TORAM PERCORRIDO$ h ;KM£KM h 
10O PRINT "FORAM GASTOS ”;LT;“LlTROS DE 1 '; C% 
110 PRINT "CQNSUMQ* KM/LTKM/L* 

120 PRINT JJ CUSTO-CR$ p, ;lLT'CUSTO)/KM;"POR KM" 
130 LET P = P + KM 
140 LETL = L + LT 
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150 PRSNT TOTAL GASTO - CR$ H ;L * CUSTO 
1.60 PRINT' “CGNSUMO MEDIO = ”;P/L;‘ l KM/L” 

165 PRINT 
170 GOTO 10 

Note que nesta solu^o tKiolamos uitia irtstru^ao CLS antes da 
imprimir o reiatorio da consume, fsso fard com qua a tela estapL 
limps no momenta dc ^mpnrnif OS resuilados. 

Outra particular! rfade dessa solu^ao 4 a utiliza^o da inshrutjao 
PRINT aem item dgum para ser impress^ (Sin ha 165). Essa Lin ha 
forga o programs. a daixar urn a Linha da tela branco (saha uma 

linha) r 

As in strides 130 e 140 s£q acumubtivas: o contefldo initial 
das variaufis £ aero a, a cada loop, s^o Inerementsdos pelos vabres 
pardaU- 

5. Descuhra qua! a fun^ao do programs abaixo; 

10 POKE 30000,211 
20 POKE 30001,240 
30 POKE 30002,201 
40 LET USR 30000 
50 GOTO 40 

N&o se preocupe com t> signtficadn dessas instru^des, mas 
aperras com o efeto conseguido. podera usar else, eferto em 
ouiros program as, como ser£ mo&trado nos axerdtios do proximo 
capJtulo. 


46 



Desvios Condicionais 



Desvios Condicionais 


Uma caricleristica peculiar do computador e a caparidade quo 
ete tem de tomar dedsoes, 

Em temnos prfitieos, o computador* em um dado ponto do 
programs, pode deddir realisar urn sdto (urn dosvio na 

program latfto) ou pmsseguir para a Inha sgguinte. 



Em programacSo algumas dedsflei; adotadas pcto cernputador 
s3o pre-estabetocidas. Vejamos um exempb: 

Suponha que voc& queiia que o CP-200 fun done como um 
Interrupter, do tat forma quo quando vocfi digital 1 r de Emprima 
“LIGADO” e quando voc3 digital 0, etc (mprirna “DESUGADO". 

Nesse case, podemos fezer uni dlagrama das etapas que dflvem 
ser executadas jse chegar ao resuttado que queramos, 

Um diagrama represents graficamente aquilo quo deve ser 
segutdo pefo programs. Isto loma muilo mais fScil ao 
desenvolvimento das u&rias elapas a wrem process^das, 

Veja o nosso exemplo disposto num diagrams de bbcos: 




































Nd segundo bioco nos & solicit adta a introdugae de um numero 
{1 ou 0), ' 

Ho blgco segulnte, o computador deye to mar uma decis3o: se 
foi dsgitado 1. dcvcra imprimir u LiGADQ'" C, ££ toi dbptado 0 r 
deverii imprimir "DESLIGADO" 

Apds a impressSo del quaJquef uma das mensagcns, o programs 
deve retomar para rsceber um novo ndmero. 

Como vocfi pode percebei, o diagrams de b]ocos e apeoiis. uma 
maneira organtzgda de s* tragar um plane p.'aia urn program a, 

CorivencronoLi-se usar um retfingulo com os lados menores 
arredondadcs pata indicar o comefo ou fim de um piograma. Um 
rating do comum represent trechos onde ocorre uma ag&o, ao 
passo que um losango denote os pantos do comadas de decisfl-es. As 
iinhas tndicam o carninho a ser percorrido, estabe'pMndo a 
seqifgrKia logics do programs . 

Cormimente, essa seqCJ^ncia, iecnicamente denominada de 
fluxg Idgico. ini£ta-se de cima para baixo ou da esquerda para a 
dsreLta, ^jvo os caso$ onde a orteniagSo ^ esripuiada medianle a 
indicagflo de uma seta sabre a Liuba, 


Um diagrams de Wocos (fluxoqrama) £ bastante uri] para 
verifiesrmos se a Icgica do programa est£ correte ou n£o. Sou 
emprego faz com que o programs fique num contfnuo bop. ou seja. 
o computador esecutar^ cuntinuarnente as instrugGes ate cue rcceba 
um comando extern o para parar (STOP ou BREAK)„ 



+■ * - 
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Podemos rtotar tamtam que a tntrodu£So de qualquer outro 
numero dlferente de 1 serS interpretada como o rifimera 0 para o 
computador, E n3o £ exatamente issO o qu£ queremas 



Segundo a Idgica adotada, o computador verificard se o numero 
cfcptado £ 1 Se n3o for, o computed nr siirjplesmerrte impdmir£ 
"DESLJGADCy 1 {veja a seqQencia no flusograma} 


Di^tarfe, t 



Prcdsamos* sntau. induir uma nova condi^ao no diagrams: 
peimiiir qua 0 programs verifcque temhem se o nGmero £ 0. 

No caso da resposia ser negative para as duas conduces 
cifadas,, o computador deve imptimir uma men sagem, Indfcando o 
erro. Veja a nossa sugesteo abaixo: 

Segtilndo o novo flujoqgra™, v-eimos que &e o rulmero n3c for 
1 h setA vfirificado ae eie € 0, antes de smprimfr a menmgpm 
"DESLIGADO". 

h\ sim N se o numero nao for nenhum dos dois, serS impressa 
uma mansagem indicando que o numero digitado n3o corresponds 
ao esperado, 

E dhvio que a medida que eoigeatnos novas restrict^ no 
programs, e'e tom-a-se ma.s comptexo, Contudo , is&o toma-se 
neeessario para ajudarmos a espedficar tudo que desejamos que o 
computedor realize. Tarnbem nos auxilLa quando desejamos descobrlr 
porque um determinado programa nSo opera oomo desefamos. 
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Pnedsamos agora transformer nosso fluxograma num programs 
em BASIC, 



A Lnstiugao <k- unirada nds )& a canhecemos: INPUT. 

Vanscs Bgcto co-ocar o numeio digl-ado em uma vsriavd 
chamada CHAVE, par example. A primeira linha seri en£3o. 

10 INPUT CHAVE 

A prdliima infitmgao deve verlficar se a varied CHAVE & 3guta| 
a 1. Em poitugufis^podeifamos drier: SE a condi^o e verdaddra 
{CHAVE= 1J ENT AO jmpiima LlGADO. 

Como a linguagtin BASIC e derivada do ingles, s-uhstitupiTio^ as 
pa lavras SE e ENT AO por suas equivalenres: ]F e THEN. Porlari(o, 
a instrutgao ohedeceta a essa con$lru£cio: IF condign verd&deirjii, 
THEN agao a ser realizada. Corn© a condig&o que procuramos £ 
CHAVE = 1, a LnstrugSo ficar£: 

20 IF CHAVE = 1 THEN GOTO LOO 

0 desvio para a 3iriha 100 permit e que $eparemD& a instrugao 
dg linprtfssacj daquela de retomo ao Iriido, cornu ahaixo: 

100 PRINT "LlGADO" 

110 GOTO 10 

Contbuanda com o program*, o proximo passo e colocar a 
instrugao que veirltca se o ciumero £ 0. Pcdemos fiuier isso da 
seguinte forma. 

30 ]F CHAVE = 0 THEN GOTO 200 

Dessa vez, a impressSo da mensagem <5 cotocada na linha 200 


SO 
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como segue: 

200 PRINT "DE5LIGADO" 

210 GOTO 10 

RnaJmente* it^uindo o fluxograma, dewemcjs introditar um& 
insJT,u,'ao para impress!*) da mensagem "NUMERO iNCORRETG",, 
juntamente' coin um novo di^svLo para a linha 10. 

O program a ficarS. assim: 

10 INPUT CHAVE 

20 SF CHAVE - l THEN GOTO 100 

30 ]f CHAVE - G THEN GOTO 200 

40 PR] NT “NUMERO INCOR'RETO" 

o0 GOTO 10 

100 PRINT UGADCT 

110 GOTO 10 

200 PRINT “DESLIGADO' 1 

210 GOTO 10 

Nao se preocupe com a numera^ao das Jjnhas, Lembre-se de 
cue cs ri&imeros apenas define in a ordem tie cxectHjSn. 

Analisando a listagem do programa, voce devc petceber que 
quando a condl^So £ vtirdcideira, o compntador realiza a instruc&o 
cue segue q THEN Caso a condi^ao seja falsa, g cgmputador passa 
para a linha seguinte, Lgnorando o conte ddo qute segue a condiG&O- 

Pocten\o& instiir esie programa num ffuxograma idemrficando 
jne3hor sua operand: 
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Rode o program a agora Vbc* deucrft obccr urn resultado 
eemdtante a es*e: 


DESLIGADO 

l;i: t;)ADCi 

DESLIBADD 
WITHER U IWCORfiETO 
L IBADO 

NUhERU INCORRETO 



Se, por engano, dkftarmos uma letia ao Lrtves de um numero, 
o computador intenompcri a e'xecujio do pcograma e apresentard 
um c6digo de eno do tlpo. 

2/10 

O mimero 2 ind^a o Upo d? erro [uaja o ap^ndfce B„ que 
<ib'i da os tddigos de erro) Neste c&sO especijLGO, signifaa que o 
computador aguardave pot um mimero, mas foi digtlada uma tertra 

O rtumero apas a hurra {/) iridica onrk ocorreti o caq fltnha 
10). Nso l Jt esgue^a de que- o CP-200 iempre indica o tipo de 
InloimatSo qua deue si>r digiiada. Asssm. quando eJe espera per um 
airing, o cursor aparece entre aspas. 

Como o que nos Inleiessa neste programs sAo apena$ os 
nfhneros l e 0, podemos faaer com que o CP 200 passe a aceiiar a 
nlrodii^Ao de qudquer caiatfere. seja de Jetra ou numero, para que 
« i rnesmo proceda a verrfica^&a Para isso devemos trocar a vanivd 
CRAVE por uma variive) s&tng, Como o nome de vari&vess string 
r /i pode ier uma ktra seguida de afrSo, podcxnos adotai a 
denoniipa(40 CS- S&o neces&Snas ainda duasoutias afteracces. Nas 
tin has £0 e 30 do programs: trocar os names e cotocar os numeros 
entre aspas para inditar que sao siring. 

Vtja abaixo: 

20 IF Cl-“r THEN GOTO 100 
30 IF C$ = J 0" THEN GOTO 200 

Rode a programs, agora afterado Expenmente digBar quatquer 
letra como L r par exemplo Dessa vez, o cqm.putador n£o utf patai 
mas impshnW “NOmerO INCORRETCT, ParcM que a mensagecn 
aioda nAo e adequada para o novo programs Mude-a usartdo o 
comando de edi&ao {EDIT), para “TECLA INCORRETA' r . 

Esta podera &ai uma das solu0es: 

10 INPUT C$ 

2(1 IF CS - “1" THEN GOTO 100 
30 IF CS - NT THEN GOTO 200 
40 PRINT L 'TECLA IMCORRETA* 

SO GOTO 10 

100 PRINT "UGADO 

110 GOTO 10 

200 PRINT "DE5UGADO" 

210 GOTO 10 

Em nosso exemplo, usamps a de flgualdade para 

to m ar a decs5o. Porem voce poderi estfcjuior qualquer condipSo ao 
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computador. Ele sempne verlficarS se & verdodeEra oll falsa, antes de 
prosseguir.. 


Operadores Relativos e Variaveis 
String 


A oondi^ao envolve sempre a compara^ao de variaveis 
numerical OU string, 

Essa comparacSo e deflntda por utn sinal que chamamos de 
operrador refotiuO. 

O sinal de Egualdade e urn exemplo de operador relative, assim 
como outros sinais que vo c& encontrar no teclado do CP-200 (>, <, 
< = ,> = , < >). 

Esses operadores exprimem as v^rias compara^Ges quo podem ser 
reatizadas pelo CP-200. Essas comparaqCes sao: 

Maior que > IF A> BTHEN... 

Manor qua < IF A < B THEN... 

[guala - IP A = B THEN... 

No primeiro caso, podemos ]er a insfala^o de exemplo como 
‘'Se A 6 melbor que B entSo,.. 1 ' 1 Uma Enstrugao desse lipo executa a 
agao especificada apos o THEN caso a variavel a esquerda do 
operador, A, seja rnaior que a que estd & direita, B. No segondo 
caso, a condigao e EnvertEda, 

Culdado para n3o confundir esses dois operadores! 

Lima meneira pratica de memoriza-los' e ]embrar que eles 
sempre aporttam para o mengr: 

MAIOR > MENOR 
MENOR < MAIOR 

Os trfis operadores relatives podem ser combinados fcrmando 
novas condigoes de comparagao: 

Maior ou iguat a > = 

Maior ou menor que < > (diferente} 

Menor ou igual a < = 

Eis um exemplo pratico: 

[F HORAS < = 240 THEN GOTO... 

Essa instrugao pode set usada em ym program a de controSe da 
folha de payamenio de uma empresa. Se o ndmero de horas 
trabalhadas durante o mes por um funcionario for menor on tgual a 
240, o computador passar^ para a rotina (parte do programs) que 
calcula o salario normal. 

Case contrfrio. saliarS para a I in ha de programs que cabula as 
horas extras. 

(Jm outro exemplo, desta vex usando oulra co mbinagSo: 

IFRS = “SENT THEN... 

Nesse exemplo vernos que o conteOdo da variavel striny R$ & 
comparado com a palavra SIM. A comparagSo entre strings e 
analogs a que se fas entre numeros. No caso adma, a condi^So e 
igual a. Portaoto, podemos entender a instru^ao como: se R$ for 
igual a “SiM" entfio.,, 

Fodemos alnda ter casos onde n3o s£o comparados apenas 
variaveis. mas tambem expnesSoes tortiplexas. Exemplo: 

IF (A*B)/(C*D)<=C*E + FTHEN... 

Para o caso de expressdes. a compara^So ^ efetuada entre os 
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tfEuItados das mesmas, Em oultiw pelavras* o coroputador cdcuk as 
*‘*pres&5es € veri(sea se a Gompanocao enire os TesuJtades 4 
vvidadfiira, A pan•! dlL o pfocedffTKmtQ k rtCwmfc] v h far verdadstifi. 
a fl^So ap6s THEN & realaada, cmo centring, passa para a prGxlma 
InbiL 

Para uma meJhor compitfensio do qot foi diio sofcre at 
comparables, dam os aqui um program a complete camo excmplo: 

10 PRINT "NUMERO*, “MAJOR" 

20 INPUT NUMERO 
30 LET MAJOR - NUMERO 
40 PRINT NUMERO, IVIAEOR 
50 INPUT NUMERO 

60 IF MAJOR < NUMERO THEN LET MAIOR - NUMERO 
70 GOTO 40 

Terite analr^M o programs f detcohri 0 que ele i&z. Cato tenhfl 
difr utriades com a Jittagem, utiLee o fluxogiamo abaixo 



O program* aceita dadl&s num^iccs e os imprimc juntamt-mlo 
com o maior riurnero tfigitado at4 a momenta A tinha principal 
deal? progra m a k. pOrianto .> de nurruso 60, pnrquf? k ela que 
permite a 3 iuali£a;fio do maiot water digit ado, case o ultimo untor 
$cja Superior 

Podemos usar uma aJtemativa para essa hnha que evie .i 
rep^iig^ao do instru^ao LET M AlOft =* NUMERO (Jin ha 30 e tin ha 
60). Podemos sub&tituir e&sa instru^o na [inha 60 pos uma instruc^o 
GOTO 30 A Imha Itcara asslm: 

60 )F MAIOR < NUMERO THEN GOTO 30 

Essa aftera^c w tefere a am panto muo;!^ important em 

pr^-yj 

Podemos anngn um oh^iivo de varias manriias dlferentes, mss 
uma dentre eJas sera a mais racomendada. £ como Lr de uma ddade 





Desvios Condicionais 


para otitra. Geralmente exlstem v&rios percursos possfvels; uns 
diretog, outrog passando por outras cidades e ainda aqtides que 
cont§m obstacLilos indesejaveis. 


Por isso, ten ha cuidado ao daborar urn programs para nao 
to mar o pior caminho, 

Lemhre-se sempre: Antes de naelhorar unn programa... fa^a-o 
funcionar! 

Como jS fol dito, os operadores relatives podem comparar 
valores string. A condigao AS =‘“TALVEZ" e verdadeiia se o 
conteudo da vabdvel A$ for "TALVEZ”, 

Urn string e menor que outro quando preced&-lo em ordem 
alfabetica, assim e "VOCE” > ' l EI-T e, veja &5. ‘"MILEiAO" 

> i 'BILHAQ 1 \ 

Resum in do, o que irnporta na cotnpara^o de string e a ordem 
alfabfilica. Para o CP-2GU. um numemo precede, em ordem 
alfabetica, uma letra. Entao L T : < ll A". Om string pode ter numeros 
e letras. indistlntamente. 

EKemolos: 

“AVEN1DA PAULISTA, 1200" < "A VEIN [DA PAULfSTA. 870” 
l, RUA A" > ll RUA T 
M ANGRA Y l < “ANGRA T 
“SEPJE AA” < “SER1E AB” 



Operadores Ldgicos 

O CF-20Q possut ainda alguns operadores que podem ampliar 
o uso da instrucSo IF... THEN. Sao os operadores AND, OR e 
NOT. Sao vocabubs da lingua inglesa que significant, 
respecfivamente, E, OU e NAO. 

Para ilustrar o uso do$ operadores 16gicos, tomaremos como 
exemplo urn programs quo verifies se uma pessoa pode assislir a urn 
filme a partir da idade e do tjpo do filme, 

Os filmes do tipo XX so podem ser assistidos por maiores de 18 
anos. 

Os do tipo A A. por maiores de 14 arms. 

Voc& podera sofisticar ainda mai&, incluindo novas categories e, 
ainda, prever o caso de crianqas at omp an had as por adultos. 
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10 INPUT F$ 

20 INPUT [DADE 

30 IF <FS=“XX" AND IDADE < 18) OB (FS = "AA" AND IDADE 
< 14) THEN GOTO 60 
40 PRINT "PODE PASSAR" 

SO GOTO 10 

60 PRINT “MUITO JOVEM n 
70 GOTO 10 



1 Escrsva um |)rograma que permita a inlrodugSo de varies 
nurneros, imprimindo, a cada Introduce, o maid' e o menor 
numero introduddos Comece pdo fluxograma 

2 Modifcque o pro-ams da questao anterior para obtesr a 
m£dis antm&tjca <k& fiiimeros infroduzjdos 

3. Escreva um fMc^ama que pextnrta a tnErodu^ao <£c quatro 
pdoVTBS e as impnmn em ordem alfalwikra. 

4. Exreva um programs qur reconheca dalas coiretas no forma 
DD/MM/AA. onde: DD e um ngmoro enire l e 31, inclusive; MM 
<& um numero en(re 1 «2 12 e AA I: um niumero entre 1900 c 2000. 

O programs dev3 jmprimir DATA INCORRETA ao eonsiaia: 
uma inegularsdade 

5. Indtta no programa da questao anlenor b instrufo^ que 
IMrmltam ao compulador reconhe'cer dalas incorr^Las inclusive para 
FEVEREIRO, ABKll., JUNHO, SETEMBRQ, NOVEMERG. 
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ProgrEjrna 


i REM CAP 7 EX 1 

10 PRINT “NUMERQ MENOR MAIOFT 
20 INPUT N 
30 LET MENOR-N 


5 -; 
















LET MAIOR = N 

PRINT N;TAfi 10; MENOR; TAB 20: MAIOR 
INPUT N 
70 IF MAfOR < N THEN GOTO 30 
SO IF MENOR > N THEN LET MENOR- N 
90 GOTO 50 

2. Aarescentarrtos as segutntes linbas: 

25 LET TOTAL = N 
45 LET M-l 
55 LET M-MT1 
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Programs: 

10 REM ORDENAQAO 
20 INPUT Af 
30 INPUT B£ 

40 INPUT C$ 

50 INPUT DS 

60 IF A-S < = BS THEN GOTO 100 
70 LET £$ - AS 
B0 LET A$*=B$ 

tiTi | pr- ci _ p-t 

100 IP B$< - C$ THEN GOTO 150 
110 LETES-BS 
120 LET B$ = C3 
130 LET CS = E$ 

140 GOTO 60 

150 IF C$<^D$ THEN GOTO 200 
160 LET E$ = CS 
170 LET CS D$ 

ISO LET DS - ES 
190 GOTO 100 

200 PRINT “A ORDEM CORRETA E: N \,AS,,B$,.CS,,DS 
4 Programs sucjeridO- 
5 REM DATA 
B CLS 

10 PRINT lL DTA?" 

£0 INPUT DD 
30 PRINT kL M£S ?' T 
40 INPUT MM 
50 PRINT "ANO^ 

60 INPUT AA 

70 IF (DD> - 1 AND DIX = 31 AND MM> - 1 AND MM< - 12 AND AA> 
1900 AND AA< 2000) THEN GOTO 100 
SC PRINT ’DATA INCORRETA"; DD; 7": MM; 'V; AA 
90 STOP 

100 PRINT "DATA CORRETA”; DD ; »/" ; MM ; ; AA 

110 GOTO 10 

Note que na Sin ha 70 utiteamos uma cond^ac bastante 
comp^exa, O CP-200 ac*ila tantas comparagoe* quarttas wore 
irttroduzir, No taso, para desviar o pjograma para a lafiha 100, k 
necessarto que todas as compara^OeS «sLejam corffltas. 

Tents montar c ftuxogractia a pgrtir da lisragem, 

5. Sugsrimos as stiguintes 
100 IF MM - 2 AND DD > 28 THEN GOTO 80 
110 IF (MM a=4 OR MM = 6 OR MM - 9 OR MM-11} AND 
DD = 31 THEN GOTO 80 
120 PRINT DD; V”; MM;V”:AA 
130 GOTO 10 

Tents montar 05 fluxtjs/ramas dar> solu^oes enconiradas 
Experiments, aincia, cotocar as seyulrtfes I in has em s^us programs s; 

1 POKE 30000, 211 

2 POKE 30001, 240 

3 POKE 30002, 201 

Feilo isso, aereseefite a jiislru^ao LETX = US3^ 30000 anles de 
cad a Einha com INPUT 
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Controlando Repetigoes 


f.m pfO^rama^&ij. a park- mats trebaLl'iosa ge* a'merits. a 
djgta^So das linhaa. Mestnci quondo romamos redo o n-titdado para 
nan conit^Er tirros nfi IrtkoclugSo de urn progr^ma, c> serviqo aindfl (i 
cansatiw 


I 





Assim, ao dabomr um programs, dg vanity parti r do prindp>o 
de qua um igkIo tompacio 4 mate conventinie, lama para dbgifai 
quando para dtfeciar ewntuaiu fjjJ’as. 

Imagine, par exempt. que quisessemos imprimir vim# vezes a 
mensagem “DIGITAR RODE TORKAR-SE CANSATIVO'’. Podemos, 
r^aliKai Ibeo de uma monelra repellttva,. digjtnndo vinta jnslrm^es 
PRINT Forem. a Irnguayem BASIC posgui retur$os que Eornam a 
elabora^nr cie um programs repel iln® numa faela muifo inl^r^nli- 
€ cnafiva 

Com <js recurtos con5irc>dos ate agora. $ e poasrvd reaJis&r essa 
[arefa de uma maneira mais rational. Veja o fiuxograma abai>to: 



Sompr 1 bo 
CO^TACO ft 


INlClO ^ 


CQNTADGR . 0 


frnpr*™ 

~DKjtTAR , rt 
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Controlando Repeti^oes 


A p&rrir desse flLixogrgma podemos e set ever o seguLnit? 
progrgma; 

10 LET CONTADOR - 0 

20 PRINT “DIGITAR PODE TORNAR-SE CANSATIVO' 1 
30 LET CONTADOR = CONTADOR + 1 
40 IP CONTADOR < > £0 THEN GOTO 20 
50 PRINT l| TAREFA REALIZADA” 

Rode o programa e vedfique se a mensagem foi impressa vinte 
vezes 

NAo acha que o programs ftcOti bastanre compacts em relate 
a W propo*i<5«i? 

O CP-200 incenpora duas instructs em BASIC que permitem 
que a conEagern dos loops seja felt a de urn a maneira mate objetlva. 
Sao as- InstruQGes FOR e NEXT, usadas- normalmente da segumte 
maneira; 

10 FOR C *■ 1 TO 20 

20 PRINT II D1G1TAR PODE TORNAR-SE CANSATIVO” 

30 NEXT C 

Pddemos en tender o s^gnificado dessas instru^oes estabelecentdo 
sua corresponds ncia para a portugues. Assim a primeira linha pode 
ser lida como '"PARA C uariando de 1 ATE 20" — o qua quer dizer 
que a vanavel C sera injcialmente sgualada a 1 para ser incremented^ 
de uma urwdade a ca-da ?&op, ate aSingir 20. 

A segunda linha apenas ;mprime a mensagem, como no¬ 
program a anterior. 

A (ercelra iinha deve ser lida como "PROXIMO valor de C\ 
Quando executed a, essa linha increments o valor da varitive] de 
controls (C) <■: desvia a execugSo para a Iinha que cont^m a in$trug3o 
FOR, 

As instcu^oes FOR e NEXT devem sempre ser usadas -em 
con junto. pois sSo ctnpletttenteres. £ important^ notar qua a palace 
TQ u$ada juntamente com FOR ^ um com an do que deve ser 
digitado usando-se SHIFT e ted a 4, e n4o as leelas T e 0, 

Os inops controlados, gerados pe!a irrstru^du FOR, sSo 
Corny memte deoominados loops FOR NEXT A vari6vei de control 
{em nosso caso, C) e sempie urns vanavet numeric^ e nao pode ler 
mais que uma Lelra no name, 

Deve-se tomar o cuidada de colocar tod a a retina (oonjunto de 
Imhasj quo se quer repettr entre as linhas que conl£m o FOR e o 
NEXT, 

Podemos ver o que acontece com um loop fazendo imprimir o 
valor de C ao inves de uma mensagem. 

Vflja o programs abaixo: 

10 FOR C“ 1 TO 20 
20 PRINT C 
30 NEXT C 

Na feta ser£ impresso: 



61 



Podemos falser com que a coni age m scja reabzada com um 
increments diferente de 1. Podemos contar. por exemplo,. de quatro 
em quatro. Pfurfi Litjlrzar um irtcnemento dtferente da unidade, 
reconemos ao coman do STEP {SHIFT e Ej. Esse comatido 
especifica, o valor do incremento usado. Veja o exemplo: 

10 FOR C 1 TO 20 STEP 4 
20 PRINT C 
30 NEXT C 

Neste programs, a vartavel de confrolc parte de 1 e e 
increment Ada de 4 a cada loop, ate atingif 20, O resuitado na tela 
sera' 


Esse programs impnme apmas einco vezes h pois o krcrernento 4 
maioi qm? no ca so anterior. Note qua awanivel de controls n5o fci 
igualada ao valor limite, pois 17 + 4 = 21. Porem, o loop foi 
intermmpido porque o valor de C ullrapassou o estabelecido na 
instrucSo FOR. 

Esse tspo de increme n to 4 normalmente utilizado quando se 
deseja reallsar calculus a intervales pr4-esiabe1ecidos dantro de uma 
dctermirtadii faixa. 

Tomcmos como exemplo uma tabela de converse em polegadas 
para a* medidas entre 5 e 10 centimetres, a intervales de 5 cm. O 
programs abaixo monta essa tabular 
5 PRINT "CEhTHMETROS PGLEGADAS” 

10 FOR C-STO 100 STEP 5 
20 PRINT C/2,54 
30 NEXT C 

Ao icdar esse programa, voce obter6; 


Loops Entrela^ados 

A rotina que compGe o loop FOR/NEXT pods oontor um 
segundo loop, interne ao pri metro, Veja 0 exemplo: 

10 FOR C » 1 TO 3 
20 PRINT "CATEGORIA 1 ’ ;C 
30 FOR T = 1 TO 4 
40 PRINT, H TIPO % T 

50 NEXT T 

60 NEXT C 

Neste case, para cada repetigao do bop exlemo serS exccutado 



LENTIMETROS 

3 

ao 
i. ft 
aoo 


0/30 

i_ 


POLEGAQAE 
], „ 

3 ,,937007 
Si H 70S Dii 
39 ,.37007 
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Controlsndo Repeti^oes 


o loop Interne por complete, on seja. sera repetidn ate se atirigir a 
valor limite. 

Rodando o exemplo voce obfcara nt* tela 


Essv tipo de disposes o £ chamado do ertfrelacamenlo do bops 
E fundamental que dois loops estejam msalmenit so parados ou, 
eritau, no caso de loops entrelacados.. um toialmeniu contirlq no 
outre. AbaiXO iDOstramos ijina esquematizacSo dti loops 


SIM 


en treked™: 

-FORA-... 
r—FOR'B~ r . 

. L NEXTB 

L NEXT A 

A onira forma permit kJa par a vs loops e a sue total dssjtin^ao. 


*FOR A-,., 
*—NEXT A 
FOR Bm„. 
LNEXT B 


SIM 


Nunc a permits quo os loops tin seus prggrainas fiquem 
sobreposlos. como blustrado abaixa: 

FORA-,.. 

St b a- nao 

. NEXT B 

Outro erro qua deve s^r Ovitado £ Urn desvlo da programacao 
do fora para dentro tie um loop Havera urn exro se o compuladnr 
errcontrar uma instru^’o NEXT sem ter passado antes por urns FOR, 
10 GOTO 50—, M 

40 FOR A**,.. 

50 PRINT... -J 
60 NEXT A 


NAO 


Aperias como exercfcio, tenre rodar alguns progrqmas com os 
erros msmdonados ne&sg capltulo. 

O bop FOR/NEXT £ ideal quando quereraos execular uma 
parte do protirama varies vejies conMcutivasi Porfim, COrtW fazer 
quando quisermos que a mesma parte do programs seia repetida em 
ponies dferentes durante a e * ecucao 7 


Sub-flotinas 



1 1: po i 
i m;^ 
tip 
i' ip 



A um con junto de 2 n 5 .tr u^Ses que executant umu tare fa 
^specifics dentro deste programs cnamamos normalmente de mtlna 
Quando e&se con]unto £ requisitadu em vaiios pontus do programs 
de iecdv<? o ncrae de subTO(»na 

Uma sub-rotina n^o piucisa ser digiledn cumpAetamente loda vtrz 
que E 01 necessaria ao program* Isso quer diiurque ^oce nSo precise 
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rj C 


digitar as intfruQ&cf a urn determimddo cslcub, tada vet 

que e\$ &er fi zw rwcsfssSno, 

Ete um exempla dd urn cAlculo que se repete varias maxes'. 


1 



f 

l 


Seri passive! escrever essa rolina apenas uma vk c apings 
referir-se a e]a quant Jo necessdrio Veja o exemplo abaixo: 



400 STOP 








ControLzmdo Ivepeticoes 


Para desuiarpara uma suL-rotina tisamos a instrmjSo GOSUB 
fGO + SUfii seguklo do numero de linha onde come^a a sub-roiin a 
desejada. Eitd deve &er um pequeno programs, total merits auto^ 
suflctente, e deve term mar com a instrugSo RETURN, Quando o 
oomputador encontra a ins-trut^o RETURN, ds rtlorna para a finha 
subsecjOenm S que provocou o ultimo desvio para a sub-rotina. 

Exemplificaremos este (opicn com um program® que monia 
uma tabela do do campeonato nacioriaJ H com o nome do time eseu? 
ponto$ ganhos. 

Em detemniriados ponto$ do programs pfreti$amos imrprimir uma 
hnha da j&sterisoos e, cm oyiros. apenas tr&s a&ten&cos, pars format a 
labels abaixo: 


K-ltSS & ft it *; V- W ft it- V V V V- if If tf # ft tf 
K ft W 

ft TIMK « PT8 « 

ft w tt 

ft ft ft ft ft ft k iv 

w FLftHEHBD w 10 * 

* PALMEXRAS ^10 * 

* ATLETICO it- 10 w 

ft ftft ft ftK-tf # ft ft46ft ft ftitf ft ft ft*H& ftft 


[rneiarerno* fezendo o diagrams de blocos (fluKogramai do 
ptfograma- 
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G -, ■% , : ndo c- TuxograiTm vrcei poC; qutf o programs 
aceiiii a tnlrodu^&> du varies 4m es e amda finalize a labels wm a 
necessidade de preeslonar BREAK ou intruduahf STOP. 

Para o computadoir parar c program* varifiesmos. apos cada 
mtrodutfto . sc foi digit&cb a palavra FIM Foderiamos u»f qua f ;qunr 
palavia mi mesmo lelra para indicar o fermmo da label*. 

Loglcamerue, o c6diyo deve set compatfvel com q programs para 
que nao surjam enos na sua toWrpretac&o, 

Na rtfatdade. a :mpires&&o de uma unsca iiinha em um progrr-jma 
tao curio nio jushKana. em uni ease piatico, a atiliza^o de sub- 
rotrnas Porcim, roossa inten^So £ esmtamenie didit;ca e esse 
example survira para dar uma boa ad &U* do use de sub-rottas* 

Aqui esla o pxoysma: 

1 REM CAMPEONATO NACIONAL 

1 OG 0 SUB m 
20 GOSUB 140 

30 PRINT h "; TAB 5; l TIME's TAB 15, "* PTS 
40 GOSUB 140 
50 GOSUB 120 
60 INPUT T$ 

70 [F Tt »“RNf THEN GOTO 200 
SO INPUT P 

90 PRINT *'\ TS'TAB 15: TAB 21;“'" 

LOO GOSUB 140 
110 GOTO 60 

120 PRINT... 

130 RETURN 

140 PRINT TAB 15;“” TAB 21; 

150 RETURN 
200 GOSUB 120 

Eis-e program* «mprega duas sub rotinas: a primeira. da iinha 
120, i in pun ie uma seqtlenria de 22 asterlscos; a segunda (linhas 
140/1501 imprime as 9fipara(0e& entre as colunas. 

Anabando o programa principal, verms que ele chama a sub- 
retina de Jinha 120 para impnmn a Iinha superior de acertscos e. em 
segmdn. a da Iinha 140 para frnpltfflfr os tste asteriscos de 
cdunarovnio. O programs segue imprimindo o cabe^lho e repete as 
sub^rotlnas em ordem inuersa Nesse ponto. o program* para b 
espera da inirodut&Q <lo nome do primetto time O no me e 
compaiado tom a palavra FlM Kao f^ndo ri t£rmino da labels. n 
programs prossegue, pedindu a introduce do numero de pontos do 
time cilodo Feito isso, o programs continue, Imprimindo os dados, u 
sepaiac-lo de cohrrtftS e retoma SJara a ttrtha 60* oode serio 
softest ad w o$ dados de um novo time, reconoe^ando o loop, O 
paograma pemiatiecera nesse bop ate que seja digitada a patavra 
FlM, leiTnlnando, Lorma, com a impessAo da Iinha inferior Je 
astensccis, 

Not*: ;ue esse prQ^ama r 3o pentHte a inhoducao de nomes 
mujJo longoa, os qyais iicam HmMados a 14 cafdCteres (tetras ou 
rkumeroji) Tamtdm o numero de ponies Ika llmilado em furi^So das 
demsrca^fleS da coluua. Para altcrar essas dt marca^das, 
oumcniandQ-a$ ou dimfeuindo-as, modiltque as lmha& de rmpressAu 
Resumindo t> que vim os sob sub-rotinasr 
-■ Devum sempje ser chamadas par uma Jnstrugflo GOSUB, 
seguidu do rujmero da Iinha oruk- come<iiin 

— Ex'vtim termkvar com uma instru^Ao RETURN 
— Dv^em vtr sempre no fim do 'program* para Eadlitar sua 
interpreracao. 






Controlando Rjepeti^des 


— Como norma gad, as sub-retinas devem str utOizidas 
apenas nos e£SO$ ein que regime r>le dSrrtinuem o ndmero de 
insIrugAeS dc um programa. 



1. Escreva um programs que Lm prims os numeros pares entre 10 e 
40, 

2. SuporfSv. que voce esfeja em lenas na Franca e que o dimbio seja 
de. Crl 7&.00 para cads franco. Escrevd um programa que monte 
uma label a com as importances em francos para diferenles quantias 
em cruzeiros, Faoa a labels com valorem de cruzeiros entre 1000 e 
5000, a intervabs de CrS 200,00. 

3. Reescrtiva o programa da quest&o anterior „ desta vez fazendo 
variar a quanta enlre 10 e 100 francos, a Intervals de 5 francos. 

4. Escreva um programs que impruna, lnicialmente, uma )inha com 
5 asterlscos e, a cada I in ha, increments de um o ntimero de 
asteriscos impresses ate atingii um total de 20 O resultado na tela 
deve ser como mostra abaixo. 


5- No prey? am a desae capiuk) que imprime as ires categoric, cada 
uma delas com quarto ripcs, acrescerle duas ueisoes diferentes para 
cada tipo. 


Solugoes Propostas 

1. 10 FOR P -10 TO 40-STEP 2 
£0 PRINT P 

30 NEXT P 

2, 10 FRJNT XRUZHRDS FRANCOS" 
20 FOR C *= IGQ TO 5000 STEP 2000 


* * 

Hr 

if 

if 

**#*##*#*#+:*#* 
if #*****«#* 

Itif fr 1 **"?*'*****^ 

r «r«- -M-«■-K- -se #f tMv ***: * 

« W W*f« Jf if«*f 

+$ ft ■# if If if If K-if Jf if tt & * * 
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30 PRINT CC/75 
40 NEXT C 

3 10 PRINT “FRANCOS CRUZEIROS' 

20 FOR F = 30 TO 100 STEP 5 

30 PRINT F h F‘75 
40 NEXT F 

4 10 FOR N = 5 TO 20 
20 FOR A-1 TON 
30 PRINT 

40 NEXT A 
SO PRINT 
60 NEXT N 

Gcjtcjcamos esse progitimfi com espa^os nfi* linhas 30, 40 e SCl 1 
upends para ressaliar n [oop mtorno. 0 CP-200 wal ignorar quaiquer 
«p^o digitado antes dtf um,i irxstru^o. 

Um detatbe im popart * ru!%*a solu^o a usi i?acto da variavg: 
COnradOra N do k>op estemo como dmnc pat a o loop interne Isse 
motlra a versatMade da linguagem BASIC do CP-200. 

A Imha 50 contem ouliu caractenslica importante do CP-200 A 
Instructs PRINT isnlada serve apenas para fineNzar cada llnha 
impress**-. Tente dtmina-la para vet o que acortlcoe 

5 10 I OR C= 1 TO 3 

£0 PRINT XATEGOR1A"; C 
30 FOR T = 1 TO 4 
40 PRINT TAB I0;T1PO*:T 
50 FOR V = 1 TO 2 
60 PRINT TAB 20; VERSAO”; V 
70 NEXT V 

00 next t 
90 NEXT C 

TtfiU* coiocar a mlista mosttada nos c&p'rtulos anteriores para 
qi;*> o CP-200 emJa urr. bip a cada impressSo (Use* por exemplo, a 
iratruG&o LET X - USR 30000 nas fcihas 15,35 e 55) 



Capitulo IX — Matrixes 

Quando ternos uma serie de dados inter-tdacionados como, per 
oxemplo, os nomes dos vamos partidpantes de uma corrida, 
podemos armazenar essas In formates todas em uma unica variavel. 


Utbaudo-rios deni r<?cuT<os conheridos ate aqut, par a isso, 
terSEimos qua cofocar cads nome am uma variSve! string dfferenle E 
claro qufi Lsso limitaria o nfimero de corredores. pois o CP-200 5 6 
pernr^te nome de vari^ueis string com uma leira c, portanto, so 
poderiarn conccrTer 26 atletas. 

No entanto, 0 BASIC do CP-200 permtte que tados esses 
dados possam ser colocados am uma unica variSve], que thamamos- 
de mafril, 

Numa matriz os dados s£o bcaJ-^ados indivkfualmente atraves 
de sua pD£i£5o Assim, com urn mesmo nome podemos charnar 
qualquer um dos dados da matriz, dlferendando-o atraues de urn 
nflmero que sera correspondent a sua posicao dentro da matrix. 

Ptidernos comparer uma matrix com uma rua qualquer, onde 
uma casa sera indentificada pelo nome da rua e pcio seu numero 
conespondente nes$a rua. 


Nessa analogia, a rua correspond e a malriz, e as casas, aos 
dados armazenados. 

Para se localize especiflcamente uma casa, valemomos do 
nome da rua jurttamente com 0 ml mere da casa ern quest&o; assim, 
para locals jar-se um demen to da matrix baseamcM'ios no nome 
desto niairiz, ass.m como no nuniero que idesmifica a posQ^o deste 
demeoto na matriz, 

A malriz pode contef dados num-ericos on sitings e deve ser 
dehnida por uma instru£5o special antes de ser u$ada. Essa 
instru^flo e a DIM (tecla D) fc que e a abreviatura de dimensao ou 
tamanbo da matriz. 

Dessa forma, DIM Mf20> dimension a uma matriz numerica que 
confern 20 numeros distintos, identificados inditndualmente como 
M(l) k M(2).M(20]_ 

Uma matriz string e dimensionada de uma maneita diferente; 
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Jci dissemog anterlormente que urn a variavel string pode ter 
qualquer comprimcnto. Seda multo diffdd dimensions uma sem 
saber exdtamente qua' o comprifnerito maximo d>» cad a string 
separadamente. Pot isso, no CP-200, informamos nso apenag o 
niimero de strings que a matriz acolhera corno Lambem o 
cmnprimento tnSxlmo de cada urn, 

For exempb, DIM M$(20,5) dimensions uma matriz para 20 
strings da oomprirosrito maxi mo de 5 caraefc&ev Isso quer dlzer que 
cad* string podeti ter, no mtbdmo, dnco fetras, nOmaros ou sinais 
de comprimenlo. 

Esiemplificatido: £e coEocarmos o nome PRADO na posi^o 3 
dassa matrix com a instrugao LEI M$f3) ^ "PRADO”, esse nome 
CKUpara todos os cinco caracteres '.la posscao, Sc eotocarmos um 
nome maEs curio como ZE, por exempb, o CP-200 cample tgra com 
espatos a dtreila. Ca$o cobquemos um noma com maas de cinco 
caractenes, apenas os cunco prime iros ser^o conskUrrados; os resrantes 
serSo simpiegmenle Ignorados, Rode esse pequeno programs para 
Lester a capaddade das matrices, 

10 DIM A [10) 

20 FOR N = 1 TO 10 
30 INPUT A (Ml 
40 NEXT N 

SG PRINT li VALOR", U RAIZ QUADRADA” 

60 FOR N= l TO 10 

70 IF A(N)<0 THEN GOTO 100 

80 PRINT A CNI. SQR A(N) 

90 GOTO 110 

100 PRINT A(N),"RAiZ 1M AGIN AREA” 

110 NEXT N 

Nesse programs. usamgs urn loop FOR/NEXT para pegar 
tod os os valorem denfrg da matriz- Um outre detalhe important^ & a 
utklizagao de ufna |un<;5o malemitica, a raiz quadra da. Como 
sElbe mug, e possivel tabular apdrifas raizes quadradas de vabtes 
maiores ou iguais a zero. Esse programs verifies se o numero satfsfaz 
esse condi^ao antes de pnosseguir com os calculos, 

No exerefeios desse capftub veremog outrgs usos para as 
matrices, inclusive as alfatiumdricas (string). 



1 Elabore um programs similar a cste da ra'z quadrada. Porem, 
o seu program* eobcar os nomeros em ordem crescente antes de 
impriiriMos, jurttamente com $uas respective rawes, 

2. Elabore um prqyrama que ten ha as seguintes caracteristicas: 
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a) permits a mtrQdiJ.CSO de ate 10 palauras Ou. frames com urn 
comprimcnso maxinnode 20carad??e& 

b) cok>que as frases on pajamas introduzidias tin ord+sm 
alfab^liCd- 

3, Modifiquc o programs anterior para que o numero de palavras- 
inlrodu^idas seja estabeleddo no momento em que o programs 
comcga a ser eKecutado. 

4, Escreua Utp novo program a quo' 

a} Aceite 20 palavras do 5 lelras cada lima e as ordene. 
b} Impdma 5 palavras, ja ordenadas, por linha. 

c) Acidfti uma nova pa!avra de 3 tinhas, 

d| Prqeura, entre as 20, a palavra de 3 terras 
e) Imprima esta pahvra, caw a tiftCOntrg, ou tniormc que fal 
palavra n&e> k eneomrs ernre as iniroduadas. 
ft Repila os liens c at£ e 

Solufoes Propostas 

i 

10 DIM A (10) 

20 FOR N - 1 TO 10 
30 INPUT A(N) 

40 IF N = 1 THEN NEXT N 

50 FOR K-NT0 2STEF -1 

60 IF A{Kj>- A{K— ljTHEN GOTO 100 

70 LET Y - A(KJ 

80 LET AtK) -A(K—1) 

90 LET A{K—1)=Y 
100 NEXT K 
140 NEXT N 

150 PRINT "VALOR Y RAIZ QUAI7RADA' 5 
160 FOR N = 1 TO 10 
170 IF A(Nj<0 THEN GOTO 200 
180 PRINT A(N). SQRA(N) 

190 GOTO 210 

200 PRINT AfN], "RAI21MAGINAR1A" 

210 NEXT N 

2. Proqrama: 

10 DIM FS 

20 FOR C -1 TO 10 

30 INPUT FS(Q 

40 Ip C - 1 THEN NEXT C 

50 FOR K = C TO 2 STEP -1 

60 IF F$(K)> = P$(K—1) THEN GOTO 100 

70 LET YS-FS(K) 

80 LET Fi(K) = F$(K—1} 

90LETFS(K^1)=Y$ 

100 NEXT K 
110 NEXT C 
120 FOR C-1TO 10 
130 PRINT FS(C) 

140 NEXT C 

3. Para alterar o programs anterior, digits as wguintes Imhas: 

5 INPUT N 
10 DIM F${N,20) 

120 FOR C=1 TON 
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4. Programs sugerido: 

10 DIM Ft(20,5] 

20 FOR C = 1 TO 20 
30 INPUT F${Q 
40 NEXT C 
50 FOR N ■= 1 TO 20 
60 FKtNT F$(N); H 

70 IF N/5«INT(N/5} THEN PRINT 
80 INPUT P$ 

90 LET P-0 
100 FOR G = 1 TO 20 

110 JF FSfC.l TO 3) -PS THEN GOTO 150 
120 IF FSIC2 TO A) - PS THEN GOTO 150 
130 IF FVC3 TO h) - PI THEN GOTO 150 
140 GOTO 170 

150 REM PAIAVKA ENCONTRADA 

155 LET P -1 

160 PRINT PS h FS(Q 

170 NEXT C 

180 FSOTINA FINAL 

190 SCROL ■ 

200 IF P - 0 THEN PRINT PI, TJAO ESTA AQUl" 
210 GOTO SO 
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MaiiipuJla ^ 0 de Dados 


Capitulo X - 
Manipulagao Dados 

0 CP-200 permits v&rias operates com os d^dos introdoados, 
itiesniO que sejam Strings Uma das mats uteis £ a capatidade de- se 
extraif parte de uma string para formar uma nova vari&ve], ou 
simplesmente para uma com paramo, 

Essa opera^O s denominada secioiramsnto, pais secianamos 
uma stnng maror para ofcfei uma oulra, menor. Essa segunda siring 
sera parte da Outra, 

Suponha qua a uariavei string AS ten ha o seguinte conlfliSdcu 


seecS^ wm 
4caractr0S 


string 




X 


M 


N 


x [ y 

secgOes cftrrt 
4 caracwes 


Nessa uari£vel podemos ter uma s£rie de substrings qua 
oompOem, juntas, a variauel original. Podemos ter palauras oomo; 
TELE AMEN, etc Pbdem ococrer, aEnda, cert as combirtagCdfi que 
nao tazern seniido cm portugues Lais coma;, PROC. CE$S> MEN!. 

Voce pode lentar, cgmo exerdcio. escrevar uma longa string de 
tal forma que toda seqilgncla de quatro caraderes forme uma 
palavrd eonhecida. Depois de elaborada a string, fo^a tim programs 
que impiima seqii&ncias na tab. 

0 seccionomento de unia string e realizado iudicando-se quais 
os caraderes que nos inter essam, con for me suas posi^es dentro da 
string. Paraisso. especificamos sen quais posi^oes se encontram o 
primenro e o ultimo caradeFes da se^ao desejsda, da seguinle 
manejra: 

EKPRESSAQ STRING ffnfcio TO firn) 

Qs uabres numericcs jVi felo e fim dellmttam a se<;ao de string, 
Veja asses exempbs: 

infcfo fim 

“SECIONAMENTG” (2 TO 4) =■ "ECr 

\\ 

do 2? ao 4? earoctere 

“SEDONAMENTO" (4 TO 10) = "IONAMEN' 1 

do 4? ao 10? caractere 

Em case de omissao dos valores inbio e fim ser&o consldetados 
os pr6prkis infcio e fim da string original, par exempta: 

' "SEGONAM ENTO" (TO) = “SECIONAMENTO" 
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FtnaJmente, se fat’ omindo apens$ urn dcs dsfemitadores, a 
seg3o $e estendeti ate o extreme da palavra, per exemplo: 
"SECIONAMENTO" TO 1) = “SEOONA" 

/ 

ai£ t> 7 ? 

“SECIGN AM ENTG'' (10 TO) = ll NTQ" 


do 10? cm dtanie 

Podemos combtnai mafrizes string com secionamento. oomo fol 
feito no ultimo exerefcio do capftuto anterior. Vejamos um novo 
exempio 
10 CHM AS(6,6} 

20 LET ASCI) - ''DCOMLD'' 

30 LET ASi2) = T7PLFTXr 
40 LET AS[3)-"RAD0??" 

50 LET AS(4)»- "8R COM" 

60 LET A|{5} ■ "BP-2XK 11 
70 LET A$$6) ■ K *O0* * * M 
80 FOR 3-1 TO6 
90 PRINT Al (1,2 TO 4); 

100 NEXT I 

Esse programs dimens^ona uma matrii string para 6 elamentos 
corri ate 6 caracteres cada Note que o espaQQ e consider ado coma 
um caracittTi:. oomo na Hrha 50 Nas Itnhas 2Q a 70 sicaiTnazenados 
vaiores nesses deroenlos. Depots disso k o compwtado^ exucuia um 
loop (Itnhas SO a 100) qua imprime consacutivamente as segues da 
cada demento da matriz O resultado, na tela, 


Alem d a sedonar strings, podemos realizar outras operates de 
grande mleresw para o programador Podemos medir o 
ccmprinUftto dii strings atrav^s da fungao LEN (abrecnatuia ds 
length, que quer dizer oomprunento), Veja o exempk>: 

10 INPUT AS 

20 PRINT Af, LEN A$ 

O progvama pede a Jnttodusao dc uma string e imprime seu 
comprimento. Se voce, ao rodaro programs, di^llEu 

EXEMPLO ENTER 

O cootpuiador imprirrwa o nfrnero J Note que o result ado da 
fungao LEN naa i uma string, mas, sJm, um numero, e d«ve ser 
tratado como tal For i&so, nunca use Instru^dos do lipo LET 
C$ = LEN AS, pots estara errado. A forma corteta & LET C = LEN 
AS 

Essa pode ser muito uti] quando, durante o programs, 

preaSUrtot wbvr a compnmeritQ de detcimin^da string. Q praams 
abaiso pede a introdu^o de uma string e verifies se existe um ponto 
de intenpgaeflo na mesma, 

10 INPUT FI 
20 LET C - LEN FI 
30 FOR P - L TO C 

40 IF F|(C TO CJ =~r THEN PRINT "CONTEM 
INTERROGACAO” 

50 NEXT P 

60 PRINT BUSCA TERM3NADA " 



Uma outra op^raijSo muito util em pfogi^rna^So c efetuada peLa 
lun^ao VaL Essa Eimy£o ttansforma uma string em urn a erpc<?ss£o 
numerics 

For exempta: 

LET X - VAL “SQK 25 + 5" 

E o mesrno qtie 
LET X-SQR £5 + 5 

Dessa maneira. transformamos a string "“SQR 25 * 5 J ’ na 
expressao SQR25 ■+ 5 k que, resol vtda, result &r£ em 10* 

A fun^ao VAL., qq&ndo for paite de uma exprassaa numerlra, 
ser o piimeiTn lem da expressdo, rartio modrid > abaixo: 

LET X - VAL SQR l& + T + 10 

A ultima opernc&o posrfvd com string £ a tr^ntforma^o de urn 
dado numerEoo em uma y&iwel siring E o tnverso cLj VAL. Vuja o 
sx«mplor 

LET X3 => SIRS 35 

Essa JnstrufSo coJoca a string "^S" na varUive] X$ A fun^o 
STRJpetmile que ism numnro seja mampulado como ^ fosse uma 

String. 

Todas as operates com dados strings podem ser usadas em 
con junto, sem que haja probtemas, Ds um «Xemp(o 
10 INPUT AS 

20 FOR C- 1 TO VAU3TRS LEN A3 + ~—T) 

30 PRINT AS(C TO} 

40 NEXT C 

Vamos tentar andisar a expressBo usada no programs: 

Suponhci que AS “ “ABCDEF', eniso: LEN A3 »6 e 
VAL <5TR3 7 + 2'T contjnuando; 

VAL (“7" + *-2"> = 7-2-5 

Port an to. a Itnjia £0 ficarA FOR C — 1 TO 5 

Armazenamento de 
Dados 


Todos os dados Intreduzkios no CP-200 precisam set 
ormazenados de alquma forma na memdrta do oomputixkf, Para 
lsvt r o tompuiador os assoda a c6d'igos espedas. Assjm, eada lena, 
nurnero, ihsttu^aQ, func&o vu com*xio lem seu c6digo especilico 
dentro do CP200 

Ja dtewmos. anteriomretrle. que os dados sAo arritarenadoi em 
bytes, na mem&ria, e que cada byte pode lepr^sentar 256 
cddkgos tUeunUes. No ap$nd£e C voce enconttari a Jktagem de 
todos os oGdlyas e corficteres do CP- 200. 

Ha apcnas um cudigo para cada caraciere do CP-200. 

Note que a defLnigSo que damos aqui para caraclere abrange 
nAo apen.is lelras e niimeros, como tambem instru^6es. fun^oes, 
drnbolos grAficos, «n5m F toda ^ quafqiaer mfcwma^ao que o 
computador possa cntender. 

Podemos descobrit quaL o cddigo <k um determinado caisdere 
cotn a fun^Bo CODE uguida do catnctere em questfto cmtre espas 

Essa fun^So fomece um resuitado numeric^ quc corresponds ao 
o6digo. segundo a tabela mostrada no apfindice C Veju, por 
exempio: 


PRIN I CODE ”C" foroeee o fiddgo 40 

PRINT CODE "CP-£00“ focTMct tambem. o c6d>go 40 

Memos c:>nciutr por c&hes e^mplos que apanas o prime *0 
caractore e conft&fciado $e oSl> Jot colocado nada eniie as aspa&, o 
resuttado scr3 zeio. 

A opera^ao In vena ^cbogar-se sum caractere a partir etc 
oridigo} e rcaJizad^ pela fun^So CHK& Esta deve sCr segutda d<? 
etfdsgo, entre 0 e 255, e fomeca coma result a do am vafor string 
conespondenle ao caractere relaik-o ao c6digo. Pot esemplo; 

PRINT CHftJ 40 

Imprime hfi tela a letra C, 

Aqui est& urn pcqueno programs que imprime todos os tddlgos 
usados pdb CP■200- e seas cAMricres correspondent's: 

10 FORC-OTO 255 

20 PRINT C“-";CHR$ C, 

30 IF C > 22 THEN SCROLL 

NSo &e preocupe com a instru^ao SCROLL na Etnha 30. 

E-a serve ape*v&s par 3 dejtac&r O conieudg da tela para cmra r 
a fim de que neb ^ abra am esp&^o para a impiessao de novos 
dados Istc ser& CKpkcodo em na prowmo capfcuta 

Port&ru*, por ota, apertas observe o deto oonsegukb rodando o 
programs t 

Esse programs Imprimiri uma ji&tagem com c^da codigo 
associado ao caraetcre correspondent® Em algumas ocasiCes, o 
computador Lmpiimiia um panto de tnterrogaipS'Ci, srtdieando que e&e 
cacacter* mao i€tn correspond* new. Esse & a ca&o das solas (lecbs 5 
a &}, do comando EDIT e de v£na& outras intormagSGS que o 
CP-200 nao eoloca na tela. 



1. Cologne uma seq&Snda qantquer deirtro <£e uma string 

oomo, pof^swmp^o 

LET ZS» "1234567S9ABCDEr 

A partir dai. ebbore uma strip de instrugOes PRINT, tentando 
otter vaiias da string original For exempfa: 

PRINT Z% [3 TO 13) 

Vbc3 p&de rentar tarnbem combsuapaes como: CTO 3), (3 TOP 
{TOh { L (4 TO 41, {4 TO 31, (-3 TO 41, (0 TO 3). 

(I TO 345)* {6 TO -99? 
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Fa^a uma anatoe previa dos aedonamentos. tentandc desoobrir . 
em qiias ca-sos haveri crro de impress^ 

2 TcnJe qqIoca* na tela os simbote giShcos que aparecem na 
li^ag^in das c&raetares [Para colocar o cursor no modo gr£lica, 
preaslortc SHIFT e GRAPHICS — teclo 9. O modo permanece alL 
ser adanado novamente o comando GRAPHICS), 

3. Etabore um progtama que inverts o ordertl das (etras de uma 
patawa introduzida. A palavra poderi ter qualquer camprirnenta 

4 . Eacfeva um programs que iwefta os cauctefes d? uma 
stung, f agendo com q Lit OS caracteres branco* pm fundc- preto 
passem. a $er pretos em fundo branco. e viee-versa 

Na £*ercv» 2 < voc« dieve ter descobcrSo coma cLgitar caracter^ 
inveflidos. o que normalmenie £ reahzado presaonand&'Se as teclaii 
no modo GRAPHICS, Usando SHIFT, podemos diguar 05 caradems 
gr^licos. Para esse programs utilize a tabelii da apgndJce C- 


Solu^des Propostas 


Os oerricos 1 e 2 nao ofeream maicn a dii •: li kiades, p(ys voce 
deaccbrtri as sotu^Oes tentsndo-as rto pr6pno computador. Se tiuer 
dHfcutdark em sail de ajguma presskme as dues teclas 

RESET simuhaneamente. 0 que farA corn que o computador 
recornece a op^iar normal mente, 

3, Sugerimoa o segulnte programs: 

10 INPUT p$ 

20 PRINT P$ 

30 LET M - LEN PS 
40 DIM 

50 FOR N = 0 TO M-l 

60 LET ISCN+ 1) -PS(M—N TO} 

70 PRINT If(N + 1}; 

80 NEXT N 
90 PRINT 
100 GOTO 10 

4. Eftta e uma das forma-s de solu^ao: 

10 INPUT ?% 

20 PRINT PS 
30 LET M = LEN PS 
40 FOR N » 1 TO M 
50 LET C = CODE PS (N TO) 

60 !F 0127 THEN LET C = C-256 
70 PRINT CHRSIC +128)' 

80 NEXT N 
90 PRINT 
100 GOTO 10 


Construindc Graficos 
com PRINT 


Uma das caiacterfetlcafr mats, interessantes do CP'2G0 £ ?vu 
capacidade de elaborar desenhos na tela, utGizando os caracteres 
graficos. Elfi permits, Inclusive, que um determinado desen ho se 
mova para qualquer din*c£o, aumente de proposes.lentamente, ou 
ainda apargga de repento. 

Neste cap'itub, veremos come utillzar a jnstruffio PRINT para 
eonsiruir desenhos na tela e, pouco a pouco, inernos desoobrlrido 
Loda a capacidade do computador em maniput^-los. 

Tais desen hos &5o construidos com carasleres graficos e s3o 
utSzados na representutSo de lunges maiemSt.cas, montegem de 
labelas, bem como na elabora^o de figuras Llustralivas. 

Pot uma cohveniSncia didAUca, denominaremos gr6fico a 
qualquer desen ho que possa ser feito na tela, 

Aconselhamos que voce execute tada passo desse cspflub, 
verLficando 0 lesuhado na tela paia nko se perder na sequence do 
curso, 

Para delxar o cursor no modo grafted, presstone 
simultaneamente as tedas SHIFT e GRAPHICS (teda 9). Dessa 
forma, de mudarA para IB Se pre v-Ortar qualquer teda nesstf 
modo, aparecer4 na tela o characters srweiso, ou seja, preto pen 
fundo branco. 

Voc& conseguira um caractere g^fico presslonando SHIFT 
juntamente com a tela correspondent ao caractere grafted desejado. 

Abaixo temos um programs que constroi uma figura nas linhas 
10 a 13, por estarem eslas no cenlro da tela. A vari&vel M k 
inicialmente, vale zero — o que toloca o nosso trem no canto 
esquerdo. (Mais adtante voce aprenderS a coIooS-b em 
mmrimeflto*) 

Es&e piograma usa; espagos; o numero 0 par desenhar as 
rodas, e alguns dos caracteres graficos para o desen ho do Irem: 


1 RBM * *FERROVIA* * 
10 LET M = O 


100 PRINT AT 
110 PRINT AT ll r M;“ 
120 PRINT AT 
130 PRINT AT 


Moon w 

iiiiiL - 

■HHG " 

00 0 " 


Vejamos agora como desenhar nossa flgura: 

— Na linha 100 celocarnos o computador no modo grafted 
depots de digiiamios o espa^o inteial da string. Para lanto, cdoque o 
cursor em ® e, em seguida, pressbne as teclas 


Effl. R(5). KEO, 3(1. ■), SCJ] para os caratferes graficos. 





Construindo GraBcos com PRINT 


Aii’tda. com SHlFI' presstonada, dcgite GRAPHICS novamente 
p£ira sair do modo ^T^ftco, ficando o cursor <£fft H SoHe a leda 
SHIFT e digite o espaco e as aspas para terminal a linha. Nas linha& 
110 a 120 og quadro^ sfio conseguidos com a tecta de espago no 
modo giafico (cursor PI) 

Na linha 110 o strin-Q entre aspas e fomiado por um egpa^o^ 
cinco quadrados, o caractere grafico da tecla 5 (I:) e um espa<^> 
final, 

Na linha 120 o string e formado por am gspago, dnco 
quadra dos, Q caractere gitifico da tecb W (^; £ um espa^o final. 

Na llnha 130 sfiO dots aspects, dels zeros* um espago, um zero 
8 um espago final. 

fiesumtndo, as ledas que devem set pressionadas entre aspas 

SfiO: 

linha 100: SHIFT 

* l espa^ 9 E R L 3 8 9 espago 13 


SHUT SHIFT 

espago 9 Sespagos teda T' 9‘ espago 


SHIFT SHIR 

espago 9 Sespa^os W 9’ espa^o 


inha 130: 

11 2 espagos 00 espa^o 0 espago “ 

Os espagos ?ao importantes para a comers apresentagfio da 
figura. O resultado na tela deve ser semelhante ao qua segue: 


Faremos agora Com que q trem se mou* As duas nstrugSe* 0 
ieguii fazem com que ele percorra tod a 3 icLi. 

10 FOR M = 0 TO 24 
140 NEXT M 

Ao cbegar no canto oposto da teb, ele p&ra. 

Nesse ponto podertamos faeer com que ele andasse cm scnlLdo 
cuntrario, re tom an do ao canto esquerdo da tela Para tsso 
nccessatamos de um nova loop FOR/NEXT que realize o movimenlo 
nesse sentido. Dessa forma let Samos dols bops, um reafizando o 
movimento em um senlido s c o outre no senlldo in verso 

FOR M =■ 0 TO 22 FOR N- 22 TO 0 

STEP 1 STEP — 1 


Podenamos escrcver duas veaes as retinas de impressSo. uma 
vez para cada loop; no entranto. ja sabemos como contomar esse 
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problema *, por issa-, usjremos as laihas de impressA-o ccnrin sub 
rodna. 

Por exemplp; 

10 FOR M-GTO 22 
30 GOSUB 100 
30 NEXT M 

40 FOR M = 22 TO 0 STEP -1 
50 GOSUB 100 
60 NEXT M 
70 GOTO 10 

99 REM * *1MPR]ME O THEM* * 

100 

140 RETURN 

Lima outra &du<;ao seiia mantis a rottna de impress^o denfTO de 
uffi unices loop FOR/NEXT ccmtrobda pur vart^veis, at qusis senam 
afoe radas apos ceda impies^o de forma a inverter o movimerito 
Weja a programs. 

10 LET A - 0 
20 LET B = 22 
30 LET C = 1 

40 FOR M-ATO B STEP C 
99 REM IMPR1ME O TREM 
10Q 
110 
120 
130 

140 NEXT N 
150 L ET D = A 
160 LET A = B 
170 LET B - D 
180 LET C =—C 
190 GOTO 40 

Este p orogt am a cgmeta oom as vaniveis defined a$ d& tel manesra 
qua o trem $e move da esquerda para a dneiia.. 

Se substituirmos a s vanaveis na llnha 40 pelos seus vatores 
it'iidais, teremckS a segginie Instru^ao: 

FOR M = 0 TO 22 STEP 1 

Quando o trem eslivar Imprasso, as variSveis A e B lerao &eus 
valorem troc&dos, utillzando Dconio varies veJ de armasenamentci 
CemporSrio {linhas 150 0 170). O ccnieudo de C £ mufcplicado por 
— 1 {LET C = — Q par a inverter o sentido da cortAgom do loop. 
Feito tesO f g programs fptoma a linha 40. que com as atteragGes 
reaheadaB equivater# a. 

FOR M=22 TOO STEP “l 

O programs oontmua. teafeando ■» bop FOR NEXT e. quart-;o 
sb.1t do Jocp, novamente as vanivets setae treeadas. e assim por 
d&nle, 

Qualqucr metcdo adctado fari com que o trem se mova 
continuamente na tela, de urn iado paia Quito 

Os pro^ramas senna mo strain apenM aJgumsi ahemafwss para 
se conseguir a anlmatSo de figuras com o s-au CP-200. 


Podemos limpar a Ida com a inscri^o CLS antes de cada 
impressed Isso far4 com qua o tr«m desapare^a e toms a aparecei 
oontinuanMnte. O moctianfo cm que elc spare ci: ria te^a e QLtaodo o 
innpriiTj3mD&. podemo$ dimlnim L s nucnsidade des&a cintiia^o na tela 
fezendo com qua u CP-200 permnnega um deleiminado tempo sem 
movimentar a Imagern. Isso 4 rcalLzado com a Irtsnru^ao PAUSE, a 
quai faz o computadcr mostiai o conte udo da tda por um cerlo 
tempo, 

Esse mlervob de tempo d espedficado iruteando-se o numeio 
de quadras que o compurador deve coJoear na tela antes de 
continuar corn o pro^ama , 

O CP-200 toloca 60 quadfo* por seguntk na tela do seu 
televisor^ portanto 

PAUSE 12 iodica uma pauw de Q r 2 Mgundos 

PAUSE 30 jnd'-a jniti peu$a de 0,5 $egundos 

PAUSE 60 mdka uma pause de 1,0 wgundo 

PAUSE 300 indtca yma pausa de 5 segundos 

Vocfi aired* poderfi laze? uso de um recui^o para modified o 
modo como o trem aparece na tela. 

Ate aqtu. temos vtsto 0 compglador impnmiT nosso trem 
gradusim^nte, mas podemo* f/dser com qua ele apaega de uma s 6 
vex na ftela 

Isso totna-se passive] gragaj a dues modahdades de 
process men to do CP 200 FAST £ SLOW. 

Quando voc£ liga o CP-200, de camera a opergi ng uebcidadb 
SLOW, processando os dados v conlrdando a Ida ao mesmo 
tempo. 

O oomando FAST {teda F) coloea o CP-200 na vdocidade 
r£ipida de protessamento {quatio gezes maior qua SLOW), em que 
ele protes^a oa dados ''preocupar-se" com a tuJa. 

O comando SLOW (it-da OJ faz com que o compurador retame 
A. vekiddadie nomnaL 

Para faciftar a TnemaTiMvlo iwies comandos, iembre-se qqe 
SLOW e FAST singificam, respective mente, lento e rapido. 

Os comandos SLOW e FAST podem ier utilizados num niesmo 
pnograma. yartgndo-se a vghtklade de pr-xes^amento de acordo 
com as 

Veja o exempb a'wixo- 

10 FOR M-0TO £2 
lb FAST 
20 GOSUB 100 
30 NEXTM 

40 FOR M = 22 TO 0 STEF -1 
45 FAST 
50 GOSUB 100 
60 NEXT M 
70 GOTO 10 

99 REM * *1MPRIME O THEM* * 

100 

110 

120 

130 

135 SLOW 
138 PAUSE 6 
140 RETURN 




SI 



Qua n do eaiiver usando a ueloddade FAST e utilizer a infilxuqao 
PAUSE, nao se esque<;a de, toyo apos essa insetucao, cotocar a 
seguinte linba^ POKE 16437,255. Sem eh, seu programa podera ser 
ppagado da memories. 

Nao e aconsalh^i/el mudar frequentemente a velocidade de 
opera^ap do computador cm umn mesmo programs, pois isso 
provocaira Lima vibra^ao indesejavd da rmayem Recomendamos que 
vocti opie por uma das veloddades c trabaibe unteamcnte com eia. 



1, UrilLando a infftrLJ$ao SCROLL que fa? com quo o contsudo 
da teta se}a deslocado para cima, acreseente algumas linhas ao 
programs do tr-em par«t que de soHe fumaca ao $e deslocar. 

2, E&edha um vefcplo qualquer (aviso, navio, carro. etc,} e 
kl^a-o mdATmenlar^sc m tda de dma pars batxo, 

3 Com o vefculo do problems anterior, hfa-o mewr-s? de um 
beta para outro da tela. 

4. Escreva urn programs, que combine a$ taraeterislLeas do$ dois 
eKdrcicios anteriores. 

5 Escreva um programs que gere um gr&tico de banas para 
va lores entre 1 e 20, referentes ao faturamento de 6 period os 
dlferenter como, por exemplo, os tmeses de Janeiro a junho. 

O programs. anics da inbrodu^o dos dados, desenha o peril) 
do grafico na reta, ^ontorme o moddo abaixo: 


6. Modifique o program a adma de modO 0 faiGr banas mais 
taigas. Tente varios caracteres yraficos e observe os efeitos 
COiiSGyujdos 

7. A crescents ao proyrama do Trem o pequena programs que 
gcra o "bip w sonoro, t attend© com que o trem op*(e 
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Consti aindo Graficos com PRINT 


So/ufao proposta 


1, Programs augerido: 

10 FOR M = QT0 22 
22 GOSUB 90 
30 NEXT M 

40 FOR M = 22 TO 0 STEP -1 
50 GOSUB 90 
60 NEXT M 
70 GOTO 10 
90 SCROLL 

95 PRINT AT 9,M; *' ‘ ” Obs: 5 espa^os, um asterisco e 

d&i5 cspflJCS 

100 PRINT AT 10,M; " " Obs: finafear com d-ois espapos 


140 RETURN 

Qs exervfcios de ntimeio 2 k 3 e 4 ficam por conta de sua 
irnagina^ao, Haseie &ua soluqao na quesiao anterior. 

5. Programa augerido: 

10 REM GRAFICG DE RARRAS 

20 PRINT AT 0,0;30:AT 4,G;15;AT 9,0 f AT 14,0 5 5:AT 19,0.0 

30 PRINT AT 20 1 4;‘*JAN FEV MAR ABR MAi JUN" 

40 FOR N = 1 TO 6 
50 INPUT X 

60 IF X > 20 OR X < G THEN GOTO 120 
70 FOR K = 1 TOX 

SO PRINT AT 20-k, 4*N + 1; " Obs. caravtsrs grAOcQ 

da teda 5. 

90 NEXT K 
100 NEXT N 
110 STOP 

120 PRINT AT 0,5,“* * *ERRO—”;X; IGNOR ADO * * *" 

6. Voc6 pode uEfizar & tnractere gj^fico da teda de espa^o para 
cons^gurr barras. mals largas 

7. Acmseente as linhas 

1 POKE 30000 211 

2 POKE 30001, 240 

3 POKE 30002, 201 
135 LET X-USR 30000 
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Plotando Graficos 


A este esragio do nosso curso, voce ja dave estar domlnando o 
seu CP-200! 

Voc4 sabe etaborar programas sufislicados. usando loop?. 
C£>iuro!;ados ou ulsfrzandO'Se de $ub-rotinas; sabe consta-uir o? mais 
diverse^ graftco? na tela, e ajnda pode fairer com que se mousm. 

Contudo, existe aindd uma limitagao pat a o ndmero de 
cacarcteres graficos que voce pode imprimir na tela com a insfrucfio 
PRINT. 

Como voce ja sabs, a tela dispde de 22 tlnhas com 32 
Cfiractcres cada uma delas. Veja isso no exe triple abaixo que 
impnme na tela a curva representafiva da fum^o mao [SINK 
nor maimer corrhetida por sendide 
10 FOR N=0 TO 31 

20 PRINT AT 11— 10*SIN (N*2*n/31), N: 1 *" 

30 NEXT 

Esse programs impdme uma s&iie rie pontOS, fomando uma 
cuiva rta tela:, Observe que os pontes est'o relativamente distantes 
entre si, quart do o ideal $eria que formassern uma I in ha continue. 

O CP-200 possui furujdes que perm item aumenrar o numero de 
pOnlos Colorado? na sc I a, mefhea'ando, &S5*m„ o irspecto da curva 

Veja o prc-giama ebaixo: 

10 FOR X = 0TO 63 

20 PLOT X,22+20*SlN(X/32*n) 

30 NEXT X 

A instrupao PLOT {cm ingles, plotar) ativq urn portfo gr&fico am 
uma determ inada posted da tela. Tente a linha imediata- 
PLOT 32.22 

Esaa instru^o fora aparecer urn pequeno caraclere grafko no 
centre da tela. 

Esse caradere equivale a um quarto do§ caracteres normals, A 
Insirucao PLOT considers a tela dividida em 44 linhas, cada uma 
comportando ate 64 pantos gr&ficos. £m uma Impressed normal, a 
tela e dividida da seguinte maneira. 


0 -—~ -- - 31 



Para especiftcar-se uma determinada posl^fio, contamos as 
linhas de cima para bau<o e as cotunaa da esquerda para a dtreila 
Quando queiemos ptotar urn determinadu ponto na tela, 
usamc* como base para o $eu posoonamenlo urn piano cartesiano. 
isto e feito definindose os sixes X (horizontal) e Y {vertical}. A 
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Plotando Graficos 


divisao constderada peEa in&lru^ao PLOT ficara. ent&o: 


43 


20 


X | 4 &.? d ) 


0 


0 40 03 

Mo exemplu mo&trado na figura adma., o primewo num«ro 40, 
represents a pos^So em rtlacSo ao eixo X; o segundo numero 20, 
srepra$G 0 ta a pasi£i5o em rela^o ao eixu V, A doss TuSmeros 
denominamos par ordenado. Nos u ugammos na instru{;ao PLOT. 

Observe que o primeiro numero. ao contrdrlo do que ocorte 
turn PRINT AT, indica a coluna e o segjundo indita a linha uiitte 
apaiecer£i o porno. 

Para se apygar um det^rmtnado ponto gryficO da tela, u&amos a 
instru^ao UNPLOT„ que signified apaqar um pen to plotado. 

Vamos nUtuar este programs de conuers&o de lemperalura para 
imfar uma curva que rel actons grass Celsius a Falirenbeit. 

His o programs: 

100 KEM ! ’X = FAHRENHEIT, Y=CELSIUS" 

119 FOR Y = 0 TO 30 STEP 5 

120 LET X = Y*9/5 

125 REM £ERQ GRAUS CELSIUS KSTA NO CANTO INFERIOR 

ESOUERDO 

130 PLOT X.Y 

140 NEXT Y 

Rode o programs e v<rija o resultado na tela; 




Esse result ado. tat conm aparece ria teta„ esta incompleio. 
Acinescsnte as Lin has shako para melhorar o qr aftco: 

10 PRENT AT 5,0;3Q;AT 10,0;2D:AT L5,0;10;AT 20.0;Q 
20 PRENT AT 21.3032 40 50 60 70 SO" 

Obs: Debts sete espacos en&e 32 e 40 e noue espsQOS entre os 
demais numeros, AJtere Lambem a linha 120 para; 

120 PLOT X-h7,Y + 2 

Ess a altera^ao 4 important. pois evils que o grfifico sqa 
plots do sabre a iegenda £ Empressa petias linhas 10 e 20). 
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Lembre-Sfc de que PLOT trabalha conn o dtabro de (inhas e colunas 
que PF1ENT.. Epor jsso que somamos 7 e £ at> par ordemado, ao 
in yes de spmarmos. 3 e 1. 

Veja como deue ficar o resultado: 


AJiert agora a tin ha 100 pdra que. seism piotados todos os 
yatores de Y entrc O g 30, 

100 FOR Y = 0 TO 30 

Voce notary, ao radar o programs, que a Inha resdt^iite na 
tela nao £ relatmefl, lslo se devfe ao fato df>$ pontos plotados serem 
todos arffidondados para o nftmaro inteira mais proximo. Assim, se 
Y for 9, X sera iguaJ a 16.2, eo valor plorado ser£ 16, Caso Y seja 
11, X sqra igual a 19,S. a o vator plotado ser£ 20. 

Vejamos agora coma piotai a curva de Y = X 2 . O primeiro 
problems e qua 7 a «49 e nao ser£ possfael plotar esse ponto na tela. 

Como solu^aOi podemos dividir todos os Y pqr LOO. Veja o 
progrma que sugerimos: 

10 FOR X = 0 TO 63 
20 PLOT X.X** 2/100 
30 NEXT X 

Rock o programs e veja se o resultado £ parerfdo com o da 

figura abaiXD: 


As fungGes como seno & co-seno produzem curvas 
caratterktieas^ porem elas maoism os result ados entrc la —1 
Portable, precisamos sdaptar os resuttado* b nossa tela fteveja o 
programs do infcio deste capstulo. 

10 FOR X - 0 TO 63 

20 PLOT X H 22+£0 * SI N (X/32 * n] ' 

30 NEXT X 

A espressao usada na linha 20 multiplies os resuttados de SIN 
par vJnte, resuttanda cm uma riova faixa, 20 a —20 Essa fabia 4 
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Flotando Gmficos 


alterada atrstves da soma com 20 para 2 a 42. Como os ntimeros 
podem ser plotados na vertical antic 0 e 43, faixa a 
perfeitameitfe acdt^vel 


+■ T 


+ 20 

+ 42 


43 

Fains do SfWO ' 

/ 

Y X 20 

\ Fsixa aropfeda j 

> + 2£ 

) ““ ) 

PLOT 

J Fiiixa da pliil (V) 

x 

-1 


A 

-3D 


m 

+ 2 


0 


Abalxo mostramos dgumas fig uias que podem ser desenbadas 
com as fungGes seno e eo-seno 


Mudando a I In ha 20, po demos fazer com que aparegam mais 
que unia sen Okie na tela: 

20 PLOT X,22 + 20*$tN*X/32 + n| 




Resumindo o que vimos sobre as 
instruQoes PLOT e UNPLOT 


— A instTugSo PLOT coioca um ponto gr&ftco raa tela; 

— A instrug&o UN PLOT apaga o ponto delinido pelo pat 
coordenpdo que a segue. Por example: PLOT 20,40 aSiva o ponto 
cobcado ria posigao 20 (horizontal) e 40 (vertical); UNPLOT 20,40 
desatlva esse mesmo ponto. 

— Ess as instrucOcii dividem a Ida em 44 'in has (numendas de 

0 a 43 ) e 64 cduniS (ruimefadas dc 0 a 63 ). 
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Digitando Scm Interromper 
o Programa 


Quando voce e stiver se divertindo coin sen CP-200, joyando 
invasores do Espa^o, por exemplu. voc$ vai pradsar imroduzii os 
eomandos imediacamerte. senn esperar que o compmador pare de 
rodar o programs para que um.i ieda seja digitsda. A Instrupun 
INPUT, riistse caso. faria o conipurador parar o so retom&ria a 
pujgrama^&u depois dc pte^sionada a leda EN')ER. 


Para suprir es&a [Lecessidarfe, exists no BASIC do CP 200 a 
funcao tNKEYS. Ela rank a se foi ou n£o preswonada alguma recla. 
e foresee coino result ado urn string qua equivaJe a teda presslonada 
<?m modu H Veja o programa 
U) LET AS = ’ VH 
20 i.ET X=SZ 
30 LET Y = 22 
40 PLOT X,Y 
FjO LET AS = INKEYS 
m LET C = CODE AS- 28 
70 IF 08 OR C<5 THEN GOTO 40 

80 IFC-5 AND X-1> = 0THKN LET X - X — 1 
90 IF C " 6 AND Y— I> = 0 THEN l.ET Y = Y-1 
100 IF C-B AND Xll< = 63 THEN LETX-X+1 
110 IF 07 AND Y + 1<=44 THEN LET Y-Y+l 
120 GOTO m 

Ester programa. partirtdo de urn ponto tocakado no centra da 
teb. imprime um Era^o Cbja direcSo voce orienlara alravcs da$ (eebs 

— Ul 

Note que noase programs cdocamos o ctidiqo correspondent h 
keb pres&onada um unw vasridrat e usamos *$$a mesina varied, 
pois, se IN KEYS fosse utilisado, uutra teda poc.kria estar sender 
p ressionada no momento 

Voce deve pTOsskynar apenas uma leeb pot raz [ou SHI FI e a 

tech) - 



1 Escreva tim presgjama que desenhe um ctrculo de raio igu^al n 20 


e centra em (30 h 20), A formula para o cfrculo t$: 
fx-nj* +■ (y — k) 2 = r 2 , onde: 

x e jf sao aj ctjoidenadas ccs pontes pertencentes ao riraJo; 
net s^o as coordenadas do centra da drcunferGncia; 
r & o comprimento do raio. 

2 Eiabore um program a que pfote uma figura na tela a partir de 
^aloi'es aleatdrios. Ublke as forgoes RAND, RND e PLOT 

3, Reescreva o program a do tircuJo de mode que s-eja posslvcl 
intradu^ir as coordenadas do centra e o comprimento do raio. 

4, E&treva urn novo programs que aceite a digital de uma llnha 
d« programs com a LmcSo a ser plot ads na forma V—f(X} 

5, Escreua um programs qoe verifique, a cada meift segundo, se 
algurna teda foi pressionada, imprimlndo 6 caractere 
correspondente ou K NADA PRESSIONADO 1 ’ 


Sohicoes Propostas 

1. Programa suqerido: 

SO FOR X- 10 TO 50 

60 LET Y-2G + SQR {400 - (X-30J * (X-30)) 

70 LET Z» 20 - SQR (400 - (X-3Q) * (X^30)) 

80 PLOT X, Y 
90 PLOT X, Z 
100 NEXT X 

2. Frograma sugendo: 

ID RAND 

20 LET X-RND 

30 LET Y - RND 

40 PLOT tNT(X*64UMT(Y*44) 

50 GOTO 10 

3. AJterasfles sugerldas: 

10 PRINT "CENTRO EM [”; 

15 INPUT N 
20 PRINT N;'\”i 
25 INPUT K 

30 PRINT Kf)-RAIQ-“ 

40 INPUT R 

45 PRINT R 

50 FOR X-0TO63 

60 LET D = R*R—(X-N)*(X-N) 

70 [F EK0 THEN NEXT X 
80 LET Y-K + SQR D 
90 LET Z - K + SQR D 
100 IF Y>43 OR Y<0 THEN GOTO 120 
110 PLOT X,Y 

120 IF Z>43 OR Z<0 THEN NEXT X 
130 PLOT X,2 
140 NEXT X 
4 PVograma sugerldo: 

10 PRINT "E5CREVA A FORMULA NA LIN HA 30 COM LET"' 
20 FOR X-0 TO 63 

30 LET Y-. 

40 IF Y>43 OR Y<0 THEN NEXT X 
50 PLOT X.Y 
60 NEXT X 


Digice esse programa earn a furn^So cuja curva voce quer ptolar 
na llnha 30, usandrj parrt isso uma insrrugao do tipo LET Y= ... 
Exempb: 

Furxeio y - kVIOO 
30 LET Y-X*X/100 
RUN ENTER 
5. Programs sugeddo 
10 PAUSE 20 f 
20 LET AS-INKEYS 
30 IF AS - hlH THEN GOTO 60 
40 PRINT AS 
50 GOTO 10 

60 PRINT “NADA PRESStONADO" 

70 GOTO 10 
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Como funciona o CP-200 por dentio 


Como Funciona o 
CP-200 por Deotro 


Nao e objetivo deste manual dasqrever em deEalhas o 
fundonamento interno do CP-200. Ho entente^ nesie cgpTiufo. 
tentaremos^dar uma boa idem do sua opeiatao. 

Os components retangulares com terminals de rneta] sao os 
cirtuites integrados, chamados Cl's — na realid&de, pode-se ver 
apenas o encapsuJamento extemo do Cl; o circalto propriamente 
dito, e rruiJto menor, 

NOTA — Nao desmonte Seu CP-200, pois isso incorrera cm pet da de garantm. 

O principal Cl do CP-20H e 3 UCP {Unidade 
Central de Processamento) que e mm tnicropracessador Z-80A. O 
processador I responsaud pov todas as operacOes antmeticas e 
iogicas do compucador. atem ie cantroiar tod as as outran partes do 
CP-200 Essas operates e coniroles segue m uma prcgramarao 
definida, gravada na mernona ROM. 

Esta programa^o e chamada Sistema Operational. O sistema 
operational do CP-200 est5 gravado am EPROM, que £ am 
dispnsitivo eleironico de arma^enamnento similar a ROM. 

Este ?i 5 tema operational k codiflcado dentro da EPROM como 
am a seqtiflneia de byte {veja defmi$3o tie byte no glossario}. Catia 
byte £ localisado damro da EPROM atraves de endere?os, O 
primeiro byte tern endere^o 0, o segundo, l r e dssim por diante ate 
8191. tsso Indk.a que o CP-200 tem am SlsteiTia de operate tfss 
S0G0 bytes ou, simplesmente, 8 KB 

O sistema de operate do CP-200 com porta o programs 
monitor e o interpretador do BASIC, e e ck o responsive] pelo 
funcionemento do CP-200, 

Voce podc saber que o valor e.sta armazenado em urn dado 
byte atmv£s de fun^So PEEK. Veja o programs nbaixo que imprltno 
os valorem dos primeiros 40 bytes do tistema operacional. 

10 PRINT ‘’ENDERECQ 1 ’; TAB 11; "BYTE"; TAB 16; 

"ENDERECOS"; TAB 27, "BYTE' 

20 FOR A-0 TO 20 

30 PRINT A. TAB 21: PEEK A; TAB 16; A4 20; PEEK (A 4 20) 

40 NEXT A 

Sob o controls des&e sistema de operand* o compulador recede 
os dados, verifies sua validade, controls o conteudo da tela, confrola 
os stnais do grauador, processa as Lnfonna^ctes e fomece os 
restAados. Para fazer fudo isso. e necessario um rascuriho, um Sugar 
ends o computsdor possa eolocar os tesuftados intermediaries > e 
rnesrno um local onde armaaeriar rodas as inform a^fres processadas, 
sejam program as ou dados, E c; ta ^rea ond^ ^ possiuel cqJocar teda 
essa informaq'iio ^ chamada rttyrtidria RAM. 

Como na EPROM , as informacoes sao armajenadas em eddigos 
nos bytes; cadi byte com seu end£re<;t>. Esses eridure^cs vanam de 
16384 e 32767. Como na EPROM, pode-se verificar o conteudo da 
RAM com a fui'i£fio PEEK 

Alem disso, podemos alnda alrerar o contsiudo de um dado 
endsreQG da RAM. 

Para colocar am dado valor em am byte de memoria usamos a 
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instrucJSo POKE. 

Note a diferonga entre fung<So e instrugao. A funf3,0 fomece um 
nssultado, &, por \$so, deve ser utilbado dentro de uma instruciio, 
como a PRINT, por exempto. 

Lima ingtrugSo pode ser introdudda direta monte em uma linha 
Portonto, pod-emes digitar simp]esmentet 
POKE 20000,36 

Essa irsstrucao coloca o codiqo 38 no byte 8e endereco 2GQ0D 
da RAM. 

]■ important salienltar que os primetros 16 mil bytes nfto podem 
ter seus conteudos alterado$. Os enderegos ate 81^1 Silo da EPROM 
e. portanto, sflo a pen as die lertura. Os 8 mi] seguintes nao s3o 
uldteados no seu CP-2£M). 

Para veriftcar □ funcionamento da instrugao POKE, digite: 

PRINT PEEK 20000 

O resdtado sera o ndmero 38 impresso no alto da tela. Voc£ 
pode repetir a exper^nda para ouEros enderegos, porem deve levar 
cm consider agSo que certos enderagos possuem informs oOes 
important^ para o bom funoonamtnto do CP-200 Mass a fremte 
daremos os enderegos dos bytes que contem eslas inbrmagoes. 

Esses bytes s5o conhecidos como variaveis de sislema. 

Para cotocar um valor atraves de POKE exlstern certas 
restrigoes, Em prlmeiro luoar, o enderego deve ser um valor enfre 0 
e 32767. O valor a ser colocado deve estar entre —256 e 255. Para 
vateres fixatives, o cornpotadot adroona 256. 

A instmgao POKE abre um imenso campo na unhzagSo das 
capaetdades do CP-200. EnfretanlCi f o conhocimento para uma 
completa uDizagSo dessa capatidade e muito extanso para ser 
abordado cm um Hwo introdulorio como este. 

Aconse! Karri os aqueles que se Lnteressarem em dominar 
completamente o CP-2GG que estudem atentarneme este livro* 
lestando novas sol ugoes para os exerctcios proposios e urisisarido^ 
variag&es das caracterfetlcas do coroputador, atraves da akeragao dos 
conteftdos das vari&vels do sisternu. 

Organizagao da Memdria 

A memdria e dividida em dtterentes areas qua atmazenam 
diferentes tipos de informal So. Cad a area e grande o bast ante para 
conter apenag a Informagao essential; a cade nova informagao 
introdunda, a £naa e aumentada Ou, em caso centring, diminiuda, O 
egpago h triads ou supcimido de4.!ocando-se toda^ as areas 
simultaneamertte A tigura ab^ixo mostra uma rcpr«sentagSo de toda 
a memdria do CP-200, induindo RAM e ROM O bloco da ROM e 
da expansiio e fixo, comegando em 0 e terminando em 16383. 

No b!oct> da RAM k que ocorre a variagao dos endeiegos, com 
ConseqUente deslocamento das viirias areas As extremidades sao 
fixas. oomegando em 16364 c termfcnaudo em i32767. 

Digaroos que voc^ digite uma iinha. lsso t^ra com que a bfcu 
reservada para o lexto que estS sen do introduado (delimitada pelas 
variaveis LIDIGIT e STKCOMJ aumente e, com da, a area do stack 
do microproocssador se desloeura, diminuindo a ^rea livre de 
memoria. 

As variavcis do slstenaa con tern as tnfcxmagCes que diaem ao 
comput&dor como de se enconha em um dado moff>ento Serao 
todas Sistadas e deserttas em detalties mais a frente. No memento, e 
mais importanie frnlender como s5o armazenadas as infomnagGes 
























































































































































































































tleniTO daE areas principal de annazenamenio E mponai’ilt:, alnda 
dlzer quo £fs nomes das variaveis do ssiemin nAo sSo raccmhecidOS 
3X>lo compuFador Para Sfc verifitai qualquer ckxS valorem, devemos 
nos uater da fungso PIII:K, 


327G7I7FFFH] 


Rotinas do 
U^ario (USA) 


MEMTOP 


Stack de 
Sub-notinas 


Slack do 

Mfcnoprooessador 


SP (indocadur do 
slack do Z^JO] 


I Espefo 
Li^re 
de 

I Memdria 


STKFIM 


Stack de 

ClJctiio 


STKCOM 


Linha DigFtada 


deTrsbalho 


UD!G1T 

ENTER (8GH) 


Van iv«s 


VARS 


MAPTELA 


Pnogramas 


16S09 (W7CHI 


\Zartoueis 
do Sfstema 


163S4 I400CH3 


8192I20QQH) 


Monitor 


Inlorpretador 

BASIC 


QtOOOGH) 











O arma^namento de uma Unha de prtxpama dentro da area 
qu« corner no enderego 16509 e tarmina no enderepo indicado 
pda uanavel TELA, d feiio da segutnte forma; 


ENTER 


Numero 
de Unha 


Compn- 
mento do 


Note qoe L conlranu a lodos os oulrus earns coin uaEores de dote 
byles. o numero da tinha £ armazenado no Z-8EJ coin o byte mate 
significative) (B + S) em primeiio tugar. 

Uma constant? numerica dentro da Ian ha 6 ideniificada pelo 
dfidlgo 126 e e representada por cinco bytes para o numero, qomo 
am a variavd numerica. (veja adiante). 

O arquiyo da tela v & copra, na memoria, da imagem na tela. 
Corner com uni ENTER, segukJa de 24 Smh&s de lexlo. cada uma 
corn 32 caracteres de compiiinento, terminadas Ipmbsm por ENTER. 
Ess? arquiuo pode ser dirnSnusdo substanciaErntmte. pois depends do 
tots) de memoria disponfve], definida pda vanive] MEMTOP. 
Quando essa variavel indtca quo cstao disponivds rneiios quo 3250 
bytes da memoria, a Jimpeza da tela {CL3) £ rsrdfeada deixando-se 
openas os caracteres ENTER no arquivo. Em caso oontrSrio, a 
Innpcza & realizada com 24 e 32 espa<;os (768 bytes). A iinstru^ao 
SCROLL e ceaas cond^o-es $ue £^eram as duas ultimas iSnb&s da 
ids pode-m produzn Em has curtas na parte inferior da tela. 

As variavets tem formal os diferentes, dependendo da sua 
nalureza, coino e demonstrado abaixor 

A variavel num£rica com nome de apenas urna leira, tem este 
forma to; 


011 LULL 


Expoente (1 byte) 


Caso o name da vanivd numerics conSeriba mate de uma krtra 
O lormato sarS o seyuinie 


oocccccc 


10CCCCCC 


2? Camctere 


Ufiimo Caractere 





Como funciona o CP-200 por dentro 



Mtitria >5 ntirn&icas t£m □ gegumte fomiato: 


100I.LLLL 


1 byte 


l I I 

110LLLLL 


Letra 


2 bytes 1 byte 2 bytes 

i—i——- j—— 

Numero del Numero d&j Pnmetre 
Bern + 7 jDimensoes / D/menseo / 


2 bytes 1 byte cade 

* u, ^ a L2Ltj 

DfmortsSo / 


'Numero del Numero del Pnmeira 
Bern. + 1 / Dintenscds f Dimensao 


Matrices stTing 


A Ordem daS elemoniog- gm uma matriz, geja llurnyrica on 
string, 6 : 

PrieTteiro. o t'kfmento cujo primeim Tndtce e urn, 

Em seguida. O eJsmento cup primeko Indite & dois; 

Em seguida, o elemento cujo pnrneiro indite £ ires; 

E assiari por dlante, ate ge pencomer todns os vaiores do prltmelro 
lndiCG- 

AJtera-se o segundo indite e, entao, torna-ge a variar o primeSfO 
Indies. 

ConSjnua-w processo para lodes os indices. 

Como exempb, consdercsmo$ a matriz A(2,3), Ifiremos: A(3,l), 
A(2,1}, A(l,2>, A (2,2), A(1,3J, A[2 S 3). 

Vartavel do controls do loop EQR-NEXT 


B 4- 3 B—$ 


010LLLLL 


2 bytes 


Numero do 
Caracteres i 


Variaveig string 


111LLLLL 


5 bytes 5 bytes 


5 bytes 


J Valor Initial j Valor Limite j tncr&mmto jd 


95 


























































































A ifiioada pek> endere^o em LIDOT com£m a imha que 
esld. sendo digjlada, al£m de algum espaco de trabalho. 

0 stack de c&fculo coni if m todas a$ infotmacGes e os valore? 
u&ados nos cSJgulos do cornpurador. 

A area Itvre contain o espai^o alnda nao usado, 

0 stack do mleroproeessador 6 utlltsado pelo Z-80 para seu 
controls intemo* 

O espa^o para as retinas USR £ sepai ado pen voofi mesmo, 
usarvdo a instrus&o NEW e a POKE. Isso serf mpsfrado no proximo 
capftub 

Variaveis do Sistema 

As uari&ueis do sktema estio armazenadas na memoria RAM 
entra os bytes de numero 16384 e 1650S 

Mas, cuidado! N&o as coniurnia com as vanave^s ussd^s peio 
BASIC as variaveis de sfrtema s3o apenas mneumfoioos, ou seja, 
nom.es de referenda que tornarn mais faoS a kknlifica£&0 das 
infojma^Ces idaOVtt ao sterna. 

Para aJterar gma vanSvd de sistema cujo endereco e p. utilize a 

fdrmula: POKE p.v - 256 a INT(v/2S6) 

POKE p +1, I NT (v/256). onde 

f ■ e o endere^o (bca za^fto da vaiiSvel'r valor que se 

dese>& infrodusr no vtetfivcl 

Para verifier qual o conteudo de gma caravel de sistema utilize 
a in strung POKE p,v — 256'INT (v/256) 

POKE n+1, INT (v/256) 

E, para verificot qua! o coriteudo de uma varl^vd de sistema 
utilise a instru^So PEEK p * 256* PEEK fp +,1], 

As abrevta^Ses do coluna 1 da lista abaixo tem os seguintes 
signjfieadas 

X nfto pode fazer urn POKE porque se;£ destnizdo pelo sistema; 

N permits fazer utn POKE, mw a vanave] n3o lera efeito; 

S as variaveis s3o prewrvadas peb SAVE. 


NOTAS 

ENDERECO 

NOME 

CONTEUDO 

1 

16384 

erkg-i 

0 codigo de denoted menos 

J In iqis em £55 fpara — 11, 
assim PEEK 163S4, sc 
bncionar, fornecvrii £55 POKE 

16384, p pode sst usado para 
forfar tim erro (HALT): 

(Xn<14 da uma das 
de notates comuns; 

15^n^34 ou 994n4l27 d& um 
codigo n3o*padrfto; e 

35£n^93 provavidmeitle 
desorganteara o arquivo de 

Imagem. 

Xi 

16385 

FI AGS 

V^rios Flags para controls o 

SLStema BASIC. 

X2 

16386 

RF.TGSB 

Endersco do pnmeiro item no 

Stack da mSquina np6s os 
relomcs de GOSUB 








Como funciona o CP-200 por dentro 


NOTA 

ENDERECO 

NOME 

conteOdo 

2 

16386 

memtop 

Ei’iderepo do pnmelro byle na 

Srea do sislemu BASIC 

Voce pode fa^pr um POKE a 
fim de que o NEW reserve 

ecima daquda £rea (vcja 
capstuio V) ou iazer corn qtre 

CLS nsserve um arqmvo de 
imagem menor. 

N1 

16390 

MO DO 

Especifka curwrlil, H.UBoulftl 

Lbiha da instru^o que est-ii 
sends esuecutada. Um POKE 
n5o Eem eieilo, exeeto na uiftma 

Imha do programa 

SI 

16393 

versao 

0 idendfica ROM de 8K cm 
prOgramas salvos. 

S2 

16394 

NUMLI 

Numero da Em ha aiua] [com o 
cursor do programs). 

SX2 

163% 

MAFTELA 

Veja o iexto deste cspSiib. 

$2 

16398 


Endere^o da pOsi£ao do PRINT 
no eiquivo de imagem r Pode 
serfetto um POKE de tal 
maneira que uma saida PRINT 
seja enviada piira ouiro Lugar 

SX2 

16400 

VARS 

Veja o totto deste capituEo, 

1 SH2 

16402 

dest 

Eridereso da vanSud em 
atribujfSo, 

5X2 

16404 

□DIGIT 

t'j-Lderego do Jofcto da linha que 
esta setido introdu^da. 

SX2 

L6406 

PROXCAR 

Endereco do proximo caifectere 
a se: Merpretodki 

S2 

16408 

xmt 

Endereco do caraciere 
preeedsndo a indicador 

SX2 

16410 

STKCOM 

Veja o sexto de^te capitglo. 

5X2 

16412 

STKFIM 

Veja o texto deste capltub, 

sm 

16414 

REGIB 

Rftgt&radot h do processador 

5N2 

16415 

MEM 

E ruder e^e usado para cibusos 
na man-ora 

SI 

16417 


usado. 

sxi 

16416 

DF*S Z 

Numero de Hnhas luiduincta 
uma Sin ha em banco) na parlk; 
inferior da tela 

52 

16419 

PROGTOP 

O ntimexq da primeiia tela do 
programs, em blagam 
automatica. 

5N2 

16421 

ULT1MAT 

Gltima tecla pressionada. 

SN1 

16423 


Ejtado de ctebounce do tedado. 

SN1 

16424 

MARGEM 

Numero de linhas em banco 
acima ou abaixo da imagem — 

31. 

SX2 

16425 

tma 

Eindere^o da prdxima Sinha de 
programs a ser executada. 






NOTAS 

ENDERECO 

NOME 

S2 

16427 

UNCONT 

SN1 

16429 

FLAGX 

SN2 

16430 

COMSTR 

SN2 

16432 

ENDSTX 

S£ 

16434 

SEED 

$2 

16436 

FRAMES 

SI 

16438 

COORDX 

SI 


COORUY 

SI 

16440 

LPBYTE 

SX1 

16441 

COLUNA 

SX1 

16442 

UNHA 

SI 


flagcd 

S33 

16444 

BUFIMP 

SN30 

16477 

MEMBOT 

52 

16507 



CONTEUDO 


A feiha para a qual CONT -iasia 
Hags variados 

Tamanho da designa^Ae do tipo 
de itrL“.g: em atritui^jQ 
Endereoo do proximo rfem na 
t3-bek de sintaxe 
Valor h&sico paia o RND Esta e 
a vartSud siigi^da pd© 

RAND. 

Coni a os quadras apresentados 
na tdevfiSo. BIT 15 t J BITS 
de 0 a l4sao deaemanlados 
para cada quadra envlftdo A 
televisao, ]sso pode kt usado 
pararemporiza^So. mas PAUSE 
tamtam a usa. PAUSE reojusta 
o bit 15 para 0 e coloca nos bits 
0 a 14 c tamanho da pausa 
Entao quando twer^rn ch^gada 
& 2ero T a paus-a sertnirta Sfe a 
pausa "PAUSE) perar dtvido a 
urn a ted a ter sido pre^lonada, 
o bit 15 e ajiistado para 1 
novamente, 

Coordenada X do flltimo ponto 
plotado. 

Coordenada Y do ultimo ponto 
pbtado. 

O Byte menos significative do 
endere^o da pr6wma posi^So 
para LPRINT imprirm 
Numeio da coluna para pcyg3o 
do PRINT. 

Numero de hnha para postgflo 
do PRINT 

Rag's variados. O brt 7 esta atiuo 
(1) durante a modalidade 
SLOW. 

BUFFER da im pressor a (33? 
caractere e ENTER I. 

Area 4a mem^ria para dsltuk>, 
usada para armazenar o* 
ndmosfi que nao pcd^m set 
cdocados converiaeriienwriie no 
Slack do procesSedoi 
Piftousado 








TJtsJlzando Kotinas em Linguagem de Maquina 


Utilizando Rotinas 
em Linguagem de 
Maquina 

A llnguagfm BASIC do CP-200 permit que se utilize, durante 
uni progr&mn normal, uma retina em linguagem de maquina para 
urn detarmlnada fwn. Uma retina em linguagem de mSqmna e mflo 
nun ueloz que uma em BASIC, pais nAo necessity ser interpretoda 
pelo program* residente ns ROM, els opera dfeetamente sofcre o 
microproceisador 

Para w imp'emenUsi essa rotina k. neccWirio conhecer o 
conjunto da imtnu^es do 2-80 (o microproceisadar usado no CP- 
200) Sugerimos ao UJUtkrio tntares&ado em corthecer o 
funcifiwirttfnto do Z 80 a leituta de llvroe eapetiatzados na 
programing desw mkcroprocessador. 

A furt^Ao que peimite a execucdo dessoi rftiinas £ a U3R. O 
argui-nemo de USR indiesra o endere^o na memona onde o 
programs em linguagem de maquina cornet^. Para o CP-200 sem 
expantSo, o SWfftO endetc^o v&lido £ 327&7 O letoma ao 
programs *m BASIC £ realrzado como o de uma sub-retina normal 
O prtKessamento recome£3 da Inh# segointt a iinha que gerou a 
diam&da USR 

Como se trala de uma fun^flo, a USR deve &er feftp de uma 
llnha de programs inidada por uma instm^AO- 
Qudquer infitrucflo pode ser utllizada para geiar urn a chamada USR, 
porem deve-se War uni considered a slntaxa da instrugao e n 
naturnlmerilo. o bom scmso. F.is aJguns examplos de instrugOes 
vfilldas pnra uma chamada USR. 

LET X-USR 30000 

RAND USR 30000 

PRINT USR 17757 

0 pcjmemo exempJo ^ o lormaio adotado nesJe fcvro pars o 
adonamenTf> do anal sonoro do CP-200. A varfavei iem como unica 
finaMfcJ* Sdlislaaei sintaticarnente a instru^o LET, e nSo deve ser 
utilizada no lest ante do programs, pois &eu conte u do depended da 
rolina USR exeoulada 

Um modo de •se euitar esse desperdteJo de merruSria e utilizer a 
instru^ao RAND — o que nao afetar^ a apcraoan da retina USR. 
Tamb4m a imtrucao RAND fundunnarA rK>mwlmentc. 

O ler^eiro exempb permrie, em aiguns casoi, alem da execute 
de retina USR. a impressao do endere^o da parrida da mesma. 

Definindo rotinas em Linguagem 
de Maquina 

Agora que jft sabemos como enecular as miinat em linguagem 
de m&qulna. predsamos sabfrr como dehm Ja^. ou melhor r corns 
inlrodu2i-]ab na memdda. 

A co]<xocflo das InStru^t’ie? da rolina USR deve s^r feita 
por bvte, atT^ues da in-rtro^So POKE. Podemos uer Isso no case do 
aclonamento do "Blp" do CP-200 Usamos as instru^ees: 

POKE 30000,211 

POKE 30001.240 
POKE 30002,201 
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Estas cokxam irnis pequena rotlfia que corner no byte 30000 
da mmndtia RAM, 3sso feito h eada vez que se quiser urn "Bip f \ usa- 
se urn a in&tiucao do tipo: LET X = USR 30000. 

Exists m algumas restri^OtJS quo deuem ser observadas quando 
e]abora-$e rorinas USR: 

1} Evire instrLUjGes RET {201 decimal] durante a notina poig essa 
instruct final izara a chamada USR, retomando ao pragrama em 
BASIC 

2 ) Quando Htornar, os reoistradorcs IY e I deuem cornier os volores, 
4000N e 3 Eh (va tores hexadecimal}, respectivamente. 
3} A operacom a tela no CP-200 utiluta os recpsiradoias A\ F\ IX, 
IY e H do Z-S0 As retinas USR nSo devem Ltsa-los caso operem 
com a tela ou mesmo com cabubs malem&tioos, Mem mesmo 0 
iellura do par AF e acotiselhSvel. 

Expansao 

Q Cl 3 ’200 possui urn conector lateral que fomeee todog og 
sinaig natessirlcs para se ter ace 5SO direto &0 microproceggador, Esse 
conector permits utitraar c CP-200 como um microprocessador Z-SO 
comum, e ^nda 00 m tapaddade de video, yrava^ao o sinalea^ag 
sonora. A panir dal, pode-se implement a? qualquer sistema h base 
de mtcroprocessador imagineyeh tomando iiimiiado o campo de 
aplrca^dO do CP-200. 

Abaixo mosLramos um esquema do corrector, Identificando os 
sinaig corflSspQndenteg a cada contato ; 
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LJtHizando Rotinas em l_iiigua gem de Maquina 


INFERIOR 

SUPERIOR j 

N.C. 

50 

A3 

49 

N,C. 

43 

D7 

47 

N.Ci 

46 

06 

46 

N-C. 

44 

03 

43 

N.C. 

42 

D4 

41 

N.C. 

40 

D3 

33 

WAIT 

38 

02 

37 

A14 

36 

D1 

35 

BUSRO 

34 

00 

33 

AS 

32 

A7 

31 

A2 

30 

A15 

29 

A12 

23 

A0 

27 

A10 

26 

A1 

25 

AS 

24 

A6 

23 

All 

22 

A4 

21 

BUSAK 

20 

RFSH 

19 

MT 

13 

GND 

17 

A13 

16 

GtMO 

15 

j TOE 

14 

GND 

13 

HALT 

12 

GND 

11 

RD 

10 

CLOCK 

$ 

MRQ 

3 

AS 

7 

m 

6 

C.S, RAM 

5 

N.C, 

4 

N.C, 

1 

N,C. 

2 

N.C, 

1 


Protegao de Rotina USR dentro da 
Memdria 

Voltando ao diayrama. mostrado siio capiMo anterior* que 
Uustrav® a distribute das irafofmatOes dentro dn memona, VOOS 
deve nolar que ejd$le urn a drea da memdria, acima tie MEMTOP, 
de^tinada rolinas USR. Quando ligamoso CP*200. o eontaudo da 
MEMTOP [uma das varliiveia de $i$tema) equlvde &o endere^o do 
ultimo byte de memdria disponiuet no CP-200 que, sem expansao* e 
32767 Spam 16 kbytes). 

Podemos ajterar o conteudo do MEMTQP atrav^s de urn 
POKE, atoindo um espa^o para nossas rotinas USR. Veja que nao 
abrimas esse espai?o para usar a rotina do “bip” livro. Por lsso, 
esse procedimento para o , 'fcip M pode gerar ptobkmas quando a 
rnemoria estiyer com um grande volume de dados, acarretando em 
perda da rolina do "Blp” O endere$£> 3O0OQ esld locaJtzado, 
inicialmcnte, no espa^o livre de memdria r qua vai sendo utiJLzado, a 
medida que se cdoca informagJes no CP-200 

Para abrir ium cspa^o no Lopo da memfrla para a rolina do bq> n 
oomo exempio, devemos usai o POKE da seguinte forma: 

POKE 16388,252 

POKE 16389,127 
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Tsso- fara com que o enderego 252 4 256* 127 = 32763 seja 
armaaenado fiffl ME-.MTOP (veja Vaiia veis do Sistema T no capituta 
Xlll>. 

Desse mode, temos os quatro ultimas bytes disponfveis para 
nossa retina USR. Enigo, podemos armazenar a rotina usando: 

POKE 32765,211 

POKE 32766,240 

POKE 32767,201 

E a execute reaiiaada por LET X - USR 32765 

Esse procedimentg profeje a ro-linj USS nao apenas dos dados 
£m BASIC, Como t&mbem de um apagamento quando far 
executada a insttucAo NEW. Essa inStru^So so limps a memoria ate a 
posi^ag indicada por MEMTOP, deixando a rotina USR intada, para 
sgt usada com noyos pro gram as em BASIC. 

Kora da Area reseryada para ela, a retina USR pode ainda ser 
colocada cm algumas postgoes da memdria relativamonte seguras. 
Como, por exemplo: 

— Dentro de uma Enstrugao REM; gotnece o program a com 
uma instrui^o REM seguida de tantos caracteres quantos bytes forem 
necessaries para a rotina USR. Como a Area de programs. come^a 
em 1650 C ) fVeja no capftub anterior) e uma, Imha de program a e 
precedidj de quano bytes de Identifier Sc . a instres^ao REM ocupara 
o byte numeto 16513 e a retina come^arA entSo em 16514, Essa 
endemto £ 0$ seguintes conieiao a rolma USR. Coloque a rotina 
nesses byte? usarido POKE como faria para outras pos^oes. 

— Em uma variavel string; dimensione Lima variavel string que 
possa center a rotina em questao e entao coioque com LET um 
caractere para cada eddigo de maquina, O apendice C contem uma 
rde^ao do caracteres e os correspondents o6digos em linguagem de 
mdquina para facitltar essa operand, 

Nesses dots laceis a retina estara prtitegada,, pois nSo sera 
substituTda par outra luforma^o quando houyer altcraqao na 
mem6da Frown, o deslocamento das Areas de memdria desJocaia 
Eambem a rosioa, o qye Soma pouca con&Avell um endirego de 
paritda para a rotina USR. 

Concluindo, e local mais seguro para uma rolina em iinguagem 
de mAquina 6 a Area propria para ela.onde estarA Imovel e protegida 
mesmo contra um NEW, A principal desvantagem nesse local e que 
a rolina nao serA gravaaa por um SAVE, 
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ApSndice A - Resume de fuucionamento 


Ap@ndl.ee A 

O CP-200 para os que ja 
entendem BASIC 

Irttrodugao 

Se vcK# j3 conhece a iinguayem BASIC, n3o clever^ encoEiftar 
problem as ao utilLzar o CP-2GG, Entretanto* de possui afgumas 
peeuii&ridades: 

1. A5 jnstru^oes, 05 comandos e as fungOes n&o sao 
Introduzidoa dlgitando-se ]e£ra per Jelra (como P-R4-N-T}, mas 
possuem suas prdprias tectas, como voefi pod€ ueriftcar consultando 
o capthiJo L 

Nesle liVH> h tats palavras sSo esrr.uis em negrito. 

2. O CP-200 nSo possui as instxufGes: READ, DATA e 
RESTORE em seu BASIC, nem fun^oes definldas peb usu£rio (FN 
e DEFl; da mesma forma, voc& n3o poder4 digitar mais de uma 

Lnstm^Eo per lining 

3. Os n?cuiscs para $e iidar com strings f^ceis de 
compreertder, mas nao $So padr&o -■ veja o eapTtulo X, 

4. O conjunto de caracteres do CP-200 d qxdusiuo [N5o 
corresponds ao ASCI. 

5. O mode como o CP-20C representa a teia em sua merndria. 
k, tambem, exclusive, 

6. Se voce esfa acO&tumado a utiliaar PEEK e POKE em outros 
computadoms, lembre-sc de que todos os endsrflqos ser&o dlfereiites 
para o CP-200 

Velocidade 

0 CP-200 trabalha em duas vabddades de processamento fast 
e slow, Ma vdoddade slow (tenia!, na quad o CP-200 opera 
normaImente f a imagem de TV k gereda continue uente, enquaolo a 
computa^a .0 6 exetutada durante os penodos de apagamento, na 
parte superior e inferior da imagem 

Na velocidade fast (rifcrida), a imagem da TV £ desligada 
■durante o pcOCessamento e apresenlada apettas so fim de um 
programs, enquanto agu&rds per dados de entiada ou durante uma 
pausa (veja □ capftub XI). 

A mod alidade fast £ cerca de 4 veze$ mate r^ipida que a slow e 
e de grande y tilidade, espedalmente em pxogramas extremameote 
iongos ou que exljam uma grande quanlidade dc pfocessamento 

Teclado 

Os c6djgt>5 de cararteres do CP j 200 repress nEam n5o &6 as 
letras e digrtos, como lamb£m abiangem as v^rias instrucGes, 
comandos e fungdes — Lodes des introduzidos atraves do teclado. 
Para tornar Isso posstvd, chegou-se a atribuir ate 5 significados 
distintos a algumas teclas, dileren.ciados cm parte, pdo usq da tecla 
SHIFT, como tarnbem pda u(iiiza0o da rnSquiioa em diferentes 
modos de Introdu^ao {vide cap. 1), 
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0 modo ^ indicado pelo cursor, uma letra em fundo claro que 
indie a aqutfo que sera jutroduado quando voce pcMoiw a proxima 
tecta. 

O mgdo E3 {para comatidos) ocoite auiomaLicamente:, 
indicando que o computador aguarda uina instruct ou urn n? de 
tlnha de programs. Se nao estluer combinada corn a teda SHIFT, a 
teda seguin-e sera interpreted* comrj uma Insfru^ao ou temo um 
dSgjio. 

O modo H e acionuda imediatamente ap6s voce ter 
introduzido uma instruct indicando quo voefi ji pode dtgitar os 
caracteres. 

O modo EM e indicative de fung&o e secure quando voce 
aclona o comando FUNCTION [as teclas SHIFT e ENTER 
$5multaneamente) h para, entSo, solicitor a fun^ao (locahzada abaixo 
da tecta). Teen a dura^o de apenas um acionamento, retomando 
cm seguida ao modo anterior 

O modo @ (para grShcos) ocorce sempre ap6s O aciongmento 
do comando GRAPHICS [SHIFT e tecta 9) e perdura ate que seja 
aclortado nouornente. 

Vnoe poder£ ainda ter no cursor a tetra ela e indicatlva de 
erro de slntexe e ocorre sempre que o computodor n&o ''eaten be” o 
que voc£ dc.seja introduat 

A Tela 

Possum £4 linhas, cada Lima comportando ate 32 caracteres. & £ 
divldida am 2 partes: a parte superior, cornpreendendo as 22 
primetras llribas, e a parte Inferior, cgmpreendendo as 2 ultimas 
I in has. A parte superior e reserve da tan to para a extbic^o das 
btitegens, como para a saida dos progjamas, enquantc que a parte 
Inferior e u&ado para introduzir bn has imediatas, Jin has de programs. e 
dados, albrn de apne&entar os eddigos de erro. 

Entrada vto tedado: apareee a esquerda do cursor, rta mefado 
inferior da tela k medsde que cada earactere e digi'ado. se;-a de uma 
terra, um dfcjito, uma fund" 10 , um comando eu uma instrufSo 

NOTAS.; 1. Voc§ porter^ mover 0 cursor para a esquerda 
at raves da teda — [SHIFT e 5) presslonadas simultaneamente, Para 
incite-lo a direita, fa$a o mesmo com -*■ (SHIFT e 8). 

2. O caiacleie tacafcado a esqitetrda do cursor pode ser 
removido atiaves de DELETE (SHIFT ■? 0). 

3- Voc£ (ambem podieri apagar toda a linha aqiotiando EDIT 
(SHIFT 0 1), wguida do ENTER. 

Sempre que yoce presiona a tecla ENTER, a linha e exocutada, 
inltoduada no progtama ou empregada com q d&do de entFada, a 
menos que contenha um erro de sintaxe, caso cm que aparece o 
cursor ^ indecando a posi^flo do erro 

A medlda iim aue as linhas de programa sao introduzidas, uma 
lisiagem vai impressa na parte superior da tela. Voc^ poder^ verificar 
es$e l6plco com mats delathes no decoder do capAuto V. 

A ultima linlia a ser inlroduziida k denominada linha atual — 
sempre indicada pelo sJmboio [Uj apds o n° de linha; isso, poretrn 
pode ser mudado utilizando-se as teclas I (SHIFT e 6) e t [SHIFT e 
7) Se o comando EDIT for adonado (a linha atual pode aer 
tiansferida e edilada (alicrada) na parle inierior da Ida). 

Quando uma linha imediata ^ executada ou um programa 6 
rodado, a safda de dados aparece na parte superior da tela e IS 
permanece at4 que uma linha de programa seja digirad*, ou ate que 


104 




ApBndice A - Resumo de funcionamento 


ENTER seja acionada seizin ha ou ainda at6 qua as tsclas J ou t 
sejam pressionadas. Na parte infemr aparece uma indicacso sob *j 
forma cod/En/w, ond« CD(i indka o tipo dp eito £ a 1*calka^o que 
ocorreu durante a execute. (A inexist^ncia de erros sera, express* 
pelo codigo 0); enquanlo que Uribes conesponde ao ri&mero da 
ultima linha executada, ou £ 0 no easo de comandos. No caso de 
introduzir-se uma iinha imediata, sera tmpreflSO a diglto 0 na tela, 
(Vcja 3sto com maiores detalhes no capftulo 10) 

Tal$ Indioagoes perrnunqcerao na tela at£ que Lima nova tech 
seja acionada, reaparecendo, assim a modalidade ra . 

Durante a exiecu^So de urn programs cy de uma &nha imediata, 
a leda SPACE opera dr modo anatago 3 teeb BREAK, parando O 
COmputador com indlc&tSo Df linha, 

Jsto e reeonhecido: 

1, Ao final de uma InSftrugao, -an quanto o programs esta 
rodando; 

2. Quando o computador procure ndo por um programs na 
fits. 


O BASIC 


Os ntimeros s£o armaaan&dos com uma pr$cls5o de 9 ou 10 
dittos, 

O maior nurnero que se pode ofcter no CP-200 gtra ern tamo 
de i(F\ enquanto o menor deles fposttivo) d de 4' 10 _39 T 

Os ndmejos podem &er armazenadm no CP-200 em ponto 
flutuante, com um byte de expoente fe r onde 1 ^ e ^ 255) e quatro 
bylgs do mantissa [m, nude 1/2 ^ m < l) f o qua represents o 
numero m'2 ?-1& 

JS quo 1/2 tti < 1, o bit tnais significatwo da mantissa £ 
sempre 1 

AssLm sendo, podemas troca-lo por um bit para represen tar o 
Sinai —0 para ndmeros posittvos, 1 para negatives, 

O zero ganhou uma represented o esp?cSal, nas quals lodos os 
5 bytes s5o 0. As variaveis numbness setnpre de ver&o ser Inldadas 
por uma letra procedidft por combina^Oes arbitr^rias de lefras e 
no meres. Os espapos sto Lgnorados. 

Os nomas das variivete de loops FOR NEXT podem ter apenas 
uma unica Letra, 

Isto e valido tombem para as matrices numerical etiquanto que 
os names refarentes as matnzes string ser5o compostos p-or uma 
unica leira, seguida de $ 

Tanto as ma&izes numericas quanlo as matrizos string exlbiirSo 
taptos itens quantos puderem ser comportados na memdria. 

O numero de itens e a tamanho dos mcKimos serao 
e$pecificados atraves da Instrugfio DIM Seus indices cotnegam cm 1, 

Seccionamento 

Poderemos isolat treebos de strings utillzando seccionadores. 

Um seccionador pode ser; 

1. vazio 

2. uma expressSo numerica 

3. duas expressO^ nunwicas opcionais iigadas por TO 

Sub-string podem ser secdonad^s de duas format d : .ferentes; 

a) expressSo string iSeccionador) 
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Na rda^ao abaixo, 

L represents qualquer Letra; 

V representa uma yaridvel; 

x,ij,z representam expresses num&ncas; 

rti.Ji representam expressCes num^rieaa que s5o aroedondadas 

para o numerc Inleiio mais pr6xfrtio; 
e represents! uma express&o;, 

/ represents uma expressao com valor literal (string); 

$ represents uma InaUxujao. 


Jnstrupdes 


Mote que expressfies arbitrjnas sSo p^rmitidas em qualquer 
lug^r. extelc paia nfimeio de linha no initio da instru0o. 

Todas as inStrugSes, exceto INPUT, podem ser usadas tanto em 
lirihas imediatas eomq em linhas de comando. 

CLEAR Cancel todas as variaveis! liberando o espa^o 

ocupado per das. 

CONT Continua a exemgAo apos urn BREAK ou STOP. 

CL5 Limpeza da tela. 

COPY Envia uma odpia da tela para a jmpressora, se 

estiver aeoplada a esta DenotagSo D, se BREAK 
for pressJonado, 

DIM L {nl irr nk) Cancels qualquer m&trfr tom o norite L e define 
uma mahris de numeros com K dlmflnsoes nJ, r .nk. 
Zara todos os element os. 

Erro 4 ocorre se nag h£ espago na memifcia para 
a mairiz. Uma matrtz £ indefinida at£ ser 
dimension ad a em uma instrufSo DIM. 

DIM LS fnf, ..nk) Cancefa qiiaique r ma/rir ou string com nome L$ e 
define uma mofriz de cwacteres com k dlmensGes 
Fteeneha de espagos todo$ os etementos. 
Pods ser corraiderada uma matriz de strings de 
tamanho ffco rrfc, com k—1 dimen sOes 


Eire 4 otone se nSo ha espa^o na memoria para 
a matrix Uma matriz e sndeftnida ate que seja 
dimen&lon.ida por uma inscufSo DIM. 

Cancels qualquer vari^vel L e define uma variSvd 
de controls com valor X, limits y, passo z, so 
endere^o de Joop 1 mais o nil mere? da Isnha da 
insirug5,o FOR (.— X se for urn comando). 

Verifies se o valor initial £ mgior [se passu > 0) 
ou mqnor (se passo < 0) que o limite, e .em case 
afirmativo, volta para a iiistrugao NEXT L, no 
infcto da 3inKa, Veja NliXT JL 
Erro 4 ocorre se nao houver espa^o na memGrla 
para a vari^vel de controls. 

Passa a suh rotina que tomega pda linha de 
numero especLticado. 

EiTO 4 pode OCOrrer sc nSo houver RETURNs 
sufiaentes, 

Salta para linha n (ou, se n^o houver, para 
primeira ap^s a mesma) 


GOSUB n 


GOTO rr 
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Ap^ndice A - Resii mo de funcionamento 


b) matriK string (mdice, Tndloe, Seccionador) 

A forma h 'b” possiii ainda a seguinie variants: ' 
matrlz string (fndlce T ..., mdicej {Seccionadod 
Na forma {ah suponba qnt a expressao de string correspoftda a 
St: m o sections dor estiver vazio [item i}, a resultado ser5 
cQi LStderado como sendo a propria airing (S$), 

Se o secdoriador for urn a axpressao num^ftca (item 2) definlda 
por n, o resullado correspond era aocaractere deflnido pela posi^o n 
(Sub string corn apenas am caractere). 

Supcnntfo que o section ad or seja composto de duas expresses 
{item 3) e qua a primeira expres^o num£riea ten ha o valor m e a 
segunda asuma o vaior n. Se Krn^n< tamanho de SS, o 
r^^ultado gerg uma sub-siring formada pelos earaches contidos entre 
as posicOas definidas por men 
Exemplify ando: 

Na rnatns 5$ = 'Ipiranga'". se m=3en*»S, leremos: 

IPIRANGA 

i L 

3 5 

SS (3 TO 5) - IRA* 

Voce poderii compreendei melhor as operates siring, lendo o 
capiluio X, 


Operagoes 


Os segulntes dmboths s3o que efwoJvem dois operandos; 
t AdigSo (cm ntirneros) ou concatenate (em sittings); 

Subtia^ao; 

* Myltiplica^So; 

/ Divisao: 

** Beua^So a um:i potencia. Erro B &e o operando esqtierdo for 
negaliuo; 

® lgual 

> Maior que; 

< Menor que; 

> = Menor ou [gual a; 

> ■ Major ou fgual a; 

<> Diferente de, 


Ambos os operaridos devern ser do mesmo 
tipo (numSritos ou string), 0 resultado e 
sempre iiumerico' 1 sc a company£o few 
j verdsde e 0 se a compafatSo for falsa. 


label a de prioridades 

Fun^es e Operates tfim as seguint&s prioridades: 


Operates Priorldade 

Indexa^ao de Matrixes e Seodonamento.. 12 

Todas aa fun^es eKceto NOT e stnal de menos .. + ,.. 11 


4> * 

Sinai .... 

V.. 

4*, — (subframe) ..., . 

NOT. 

AND .. 


9 

8 

6 

5 

A 
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EF * THEN s 


INPUT V 

LET V = e 

LIST 
LIST fi 

LLIST 

LUST n 

LOAD T 

LPRINT.., 


NEW 

NEXT L 


Se x fof verdadeiro O zero), £ftt&0 S e 
executado. 

0 formats “IF x. THEN numero da hnhti* nso 4 
permitldo. 

P5ra e esjwsra que seja felta uma entrada de 
dados, 

G arquivo de imagem 4 imprcsso no modo 
FAST, INPUT nSo po-rie scr usado oomo 
tomando, pots ooon«(£ eno 8. 

So O primeim caradere em uma linha dlo INPUT 4 
STOP, o programs p£ra com denota^o D, 

Atribui o valor c a varisvel y, LET nSo pode ser 
omttEdo. Uma variavel simples 4 indefinida, ate 
flguiar em uma instrusSo LET ou INPUT. Se v & 
uma string, entao o valor e do string i truneado 
ou preenchldo com zeros a direita, para ter o 
mesmo oomprimento que a vapivel V. 

Ligftr o programa irirdancfo ncr 1 ° Jinha. 

Lists o programs na televjsao. inicland-o na linha 
a, e faz de n a linha atual. Erros 4 ou 5, se a 
listagem for multo longa para a tela; CONT far3 
exstamente o mesmo, novsm^rite. 

Imprime o programs iniciando na 1? Itnha. 

Como UST, porem usando a Impressom e 
nso a TV, 

NSo faz nads se n&o Louver impnessora; p£ra 
com denota^o D, se BREAK lot pressionada. 
Plrocura o programs chamado / na fita e carrega'O 
com suas variSveis, Se f = entao carrega o 
primeiro programa eneontrsdo. 

Se BREAK tor presGaonado, errt£o (1) se nenhum 
programs for lido na fits, p&a com denatagso D e 
o programs amigo; ( 2 ) se uma parte do programa 
foi Lida, coiao executa NEW. 

Como PRINT, mss usando a impressora. Uma 
linha de texto € envlsds & Impressora; 

(1) Quando s jmpnessSo salts do uma linha para a 
pnoxims; 

(2) Apds tPRINT que nso termlna em uma 
vfcguta ou um ponto e Vfrgula. 

IS) Qusndo uma virguia ou ilem TAB requer uma 
nova Linha, 

(4) No flm do programs, se hi algo que nao foi 
impresso. Num item AT, apcna* o numero da 
coluna tem efelto; o numero da linha & ignorado. 
Um item AT nunca manda uma linha de texto 
para a impressora. 

N5o hi eleiio aigum se n&v bouvcr a smpressora. 
F&ra com denots^o D se lor presaionadc 
BREAK, 

Inicis o sislema BASIC, csncelando o programa e 
as varl^veLs t* Jimpando a memdtia atfi (mas nSo 
induEndo) o byte cuio endere^o est^ na variavel 
MEMTOP (bytes 16383 a 16380). 

(1) Encontra a vsxiavd de contrcale L. 

|2} Retomsia a linha cue comem FOR.,, se o 
valor de L e$tiver entre os vaJores: snlcSal pc) e 
limite {y)^ 
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Ap&ndice A - Resumo de funcionarnento 


PAUSE * 


PLOT f*i,rc 

POKE m,n 
PRINT... 


Erro 1 se ntLo ha variavd do controls L. 

Para o proceswmento e exibe a imagem durante 
n Quadras {a 60 Quadras par sirfjundo) QU ate 
uma tecta ser pressionada. Caso o valor nap 
esteja na faixa (Kn465535, OCOrrera um erro B. 
erro B. 

Se n > 32767, ent^o nSo ha Jimite para a paU$a> 
mas dura atd uma tecta ser pressionada. 

o ponto grSfico na leta deflmdo pdos 
ualores absnlulos de m e n, Move a posi£5o de 
impressao para apos o refeiido ponto. Deve-se 
obedecer as seguintes condi^Oes fKm<63e 
(Kn<43; caso contrario, erro B. 

Escrewe o valor n do byte de enderefo m. 
(K/7i^65535, ™255<ri<255, ou entSa em B. 

O £ uma seqtt&ncia de fleas PRINT, 
separadas per virgula ou panto e vTrgula. EJes 
esrfio e$critos no arquivo de imagem na tdevtBSo, 

A posifSo fllnha o coluna) onde o proximo 
caracter deve ser imprssso & chamado de posicio 
de impre&eAo (PRINT). 

Urn item; PRINT pode ser' 

(1) Vaao, isto e, nada; 

(2} Utna expressSo numeric^., 

Primeiro, um steal menos & impresso se o valor £ 
negatives, Em seguida, atribui a Xo modulo do 
vator. 

Se x<lO - ^ou x^lCP, entso a impmssap usa 
riatae3o cientrtica, A mantissa torn ate 8 d^iros e 
o ponto decimal (ausente am caso da 1 digito) 
est5 apos o primeiro, O expoente e E, seguido de 
+ ou —, segutdo de meis 2 dfgitos.. Em caso 
canB&rio. X d impresso em notec&a decimal 
ordinaria de ale S dittos signifirallvo$ e sem zeros, 
apos o ponto decimal. Uni ponto decimal no 
infeio & sampre seguido de urn zero. 

0 £ impresso cam, um tinleo dTgito 0 

(3) Uma express^o string 

Os caracfi&e? s&o impresses segundo o c6digo de 
cararieres do CP-200, Alguns ocupam mais de 
um dgilo na tela (PRINT. INPUT, etc.), O 
caracter de aspas £ impresso como 11 . Caractems 
nag usados e caractere$ de control® s&o imprests 
como 

(4) AT m,n 

A posi^ao de ampnessao e mudada para linba m 
[contando do topo), ooiuna n {contando da 
esquerda). 

Se |mj = 22 ou 23, erro 5 

(5) TAB n 

n e rsdiuLEido para mddulo 32. Entao a posicao 
de impressflO £ mo^da para cpluna n, 
psrmanecendD na mesma linba, a menos que isso 
envolva retorno na mesnua Jinlia; neste caso, 
move-se para prdxima iinha. 

0^n^255, ou entao eup B 

Um ponto e uiigula antre 2 Hens imobiliza a 
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RAND 
RAND n 


REM... 

RETURN 


RUN 
RUN n 
SAVE f 


SCROLL 

STOP 

UNPLOT m s n 


posi^Io de (mpre^sSo de forma que o 2 17 item siga 
logo apos o prifnetro. 

Uma viguta, per ouTro Iado. move a posiqfio <Je 
impressao de no ninilmo urn lugsr; e, apbs isso„ 
lantos quanro forem necessaries para deixa-la na 
coluna Ool 16, Introduziindo urn a crova linha. sc 
necesscirio. 

Ao firn <Je lima insiifu^o PRINT, $£ fi3o lermtnar 
com um ponlo e vngula ou virgufa, urns nova 
linha sera colocada. 

ErrO 4 [fora da menioria) pode OCOrrer com dk Ou 
menos memdrlSi. 

Ejto 5 slgniftca que a tela esta replete. 

Em ambos os ca$0$, a sc^u^ao e CQNT t que 
timpara a teia e conlinuara. 

RANDO 

Airabul valor a variavel do sistema (chamado 
Seed), usada para gerar o proximo valor de RND. 
Sc n ^ 0, o Seed reeebe o valor n; se' n = 10 Ihe 
& dado um vafor de uma mtfie cah^vei do srsiema 
[chamada FRAMES) que conla os quadros 
Impresses ate entao na televisao, o que deve sei 
b&stante randdmico. 

Erro B ocorre se n n£o egtiver na faixa 
de 0 a 6553S, 

Inciicidor de mensagem. Identifies comentfirtos 
em um progiama. (Abrev. REM ark}; igoora o 
restante da linha, 

Relira o numero da linha do stack de GOSUfl a 
salta para a linha seguinte. Erro 7 ocorre quando 
nSo hA: ndmero de tmha no stack ou seja, 
GOSUR nso devqrS estar piopriamente 
balanceado pefos RETURNS. 

RUN 0 

CLEAR, e s ent3o. GOTO n 

Grava o programs e vanaveis na fita e d-snorrurui- 

os de /. 

SAVE nao devC ser usado em gma foiine 
GOSUB. 

Erro F ocorre se / for utna string vazia,, o que nap 
£ permitido, 

Cira o arqoivo de iniagem utna linha para cima 
perdendb a linha -do topo <e cTiando outra 
embaiso. 

Finaltea o program a com denotajSo 9, CONT 
refoiciara na prbxlma linha. 

Como PLOT, porem Jk branqiieia" o demento de 
Lmpressao. 


AND Operac^o Binaria em que o 
operando deverS ser sempre 
um nuniero. 

Se o operando da esquqrda 
for num^rioo: 

Se o operando da esquefda 
for uma slnng. 

ASN NumerO Arcoseno em radian os 

erro A se x n3o estiver 
entre “1 C 1- 


A AND B = y; ' ° n 
}0 se R » 0 

AHAhfn n f A$ se BA 0 

asandb = p.. MB _ 0 


Ap^ndice A - Resumo de fundonamento 


ATTV 

CHRS 


CODE 


COS 

EXP 

CMKEYS 


[NT 

LEN 

LN 


OR 


PEEK 


PI 

RND 


SON 

SIN 

SQR 

STRS 


T AH 
USR 


Numero 

Arqo-tangente am radianos 

Nurnero 

0 caractare cup cddLgo & x. 

String 

airedondado para o numero 
inteoo ma^ ferintimo, 

Eeto B se x.nao estiver na 
falxa de 0 a 255, 

0 codigo do primeito 

Ntimera (em radiance) 

caracterc em x. (ou 0. se it 
for string vazioj. 

Co-seno 

Numero 

e* 

Sem operando 

!_& o leelado. 

Numero 

O resultatio e o taractere 
represent&ndo (em rnodo 

L ) a tecta pressionada. 

Sera uma string va2b se 
nenhuma ted a for 
pressiociada. 

Parte intdra fsempre 

String 

arredondada para me nos) 
Compiimento da stung 

Nfimero 

Logaritmo natural (na base 

Opfir&cao btnlria 

Ambos os operandos 

e). Erro A se k< 0; 0 se 
x^O; 

l se x=*0 

NOT tem prioridad# 4. 

< 1 se B*0 

devtm ser numeros 

A OR B ■= \ 

NGmero 

{ A se B = 0 

OR tem prioridade 2. 

O vaJor do byte da inemdria 

Sem operando 

cup endfrero 6 x 
(anredondado para o inteiro 
mais proximo). 

Ejtq B s# X n&O estiver na 
faixa de 0 a 65535. 
n (3, 141 59265.,,! 

Sem operands 

Gera uma seqilenda pseudo 

Numero 

aieatdrta de numeros 
enfcre Oc 1. 

0 s5na( (0,1 ou — 1) de x 


Numero (em radianosj 
Num^ro 

NGmero 


Nfimeto (em radianos} 
Numero 


seno 

Raiz quadrada; 

erro 3 w x < 0. 

Transforms um numero em 
um string que 6 represents 
libaralmente, 

Tangent# 

Chama a sub-rotma em 
linguagem de m&qufoa cuja 
primeiro endera^o ^ x. Ao 
retq.rr.ar N * rtsd-tedo ^ O 
conteudo do par' de 
registradores be. CeJcuh x 
como se fosse uma 
express^ a rmm&ica &io C 
se x contiver um erro de 
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tSftmero 


smtajie, ou femecer o valor 
do string. Outro$ ottos s£o 
posses, depertdendo do 
siring, 
negate 
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ApSndice B - C6digo de Enos 


Apendice B — 

Codigo de Erros 

Esta labels retrata Codes os GSdiyos de Erros do CP-2Q0 
descnjvendoos e aprestfntando uma Lists de sftnac&es [hstvi^6e5 e 
f uncles) n<t>5 quais possani ocorrer. 

No Apendtce A, abalxo de cada furi^ao ou Lrislrugao, voce 
podera enconirar uma descricao mate detalhada do quc signifies a 
indicate do enq, 


CODIGO 

SIGNIFICADO 

SITUACOES 

0 

ExecugSo bem sueedida ou safco para 
uma jEnha de maigr n timer o que 
quaiquer outra existence, 
t Jma indicate 0 nio altera o 
numero da Lin ha usado por CONT, 

Qualquer 

1 

A uariavet de controle n5o exists 
(nSo fol eslabelecida por uma 

Instrufao FOR), mas extsle urna 
outra varESvel com o mesmo tome. 

NEXT 

2 

Foi utiiizada uma vatiavel indefinida. 

No easo de uma variSvd samples, 

Ssso oeorrer^ se a rnesma for usada 
antes de ter $ido referendada por 
uma ktstru^Ao LET. 

Para mgtriaes Isso aconii?cer& se as 
jnesrnas forem usadas antes de ser 
dimensionadas pete instru$9o DIM. 

El para uma variauel de controle Isso 
ocorrerd easo a mesma for usada 
antes de ter ado deElnida eorrio 
variave] de controls por uma 
instru^So FOR e se n5o hoover 
nenhuma vanavel simpler com o 
mesmo fienur 

Qualquer 

3 

A matriz riSo eontern o demento 
especificado. 

Caso o fndiee esteja fora de faixa (ou 
seja, ne^abyo ou aama de 65535). 
ocorrera. o erto B. 

Matrix 

4 

Espago insufleieote na memdria. 

Observe que o ngmero de linha na 
. IndteagSo (ap6so /} podera essar 
incomplete na tela, devido a falta de 
memoiia; asdm, por exempb, 4/20 
poderS surgir oomo 4/2. 

LET, INPUT, DIM., 
PRINT, LIST. PLOT,. 
UNPLOT, FOR, 
GOSUB; 

As veaes, durante 
avaJ]a£io de fringes, 

5 

. N&o ha mats espago na LeU- 
| CONT crtar^-e.spa^o. Ilmpando a tela. 

PRINT, LIST, PLOT i 
UNPLOT. 
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SEGNIFICAOO 


snuAgOES 




Resultado fora do& EimiteS do 
armazenamento: 05 caiculos 
produziram urn numero superior 

a 10 s *. 

Qualquer tUculo 
aritm&lco. 

RETURN sem um GOSUB 
correspondente 

RETURN 

Voc^ tentou um comando INPUT 
fiao permitido 

INPUT 

]nsLru£at> STOP executada. 

CONT fara a execucuQ come^ar da 
prdxima linha. 

STOP 

Argument© invalid© para eertas 

SQR.LN.ASN.ACS 


f unifies. 

O CP-200 s6 aoeita numaroa mteiioi 
compreen didos entre o 65535. 

Quail do urn numero inteiro faz-se 
necess^rio, o argumento e 
arredondad© para o numero Hlteiro 
in sis prijiyrno. Caso esse 
aired onda men to esteja fora da faixa, 
surge etrro B- 

Para ace^o a matriz, vefa tambem 
indicador 3. 


0 iexlo do argument© (de string} de 

VAL nao forma uma exprciSSSo 
numerica v^lida. 

VAL 

1 . Programs intenompido por 

break. 

2. A linha INPUT camera com STOP 

ao fim de quatquer 
tostrugao ou em 

LOAD. SAVE, 

LFR1NT. LUST ou 
COPY. 


RUN, rand, POKE, 
DIM, GOTO, 
GOSUB, LIST, 
PAUSE. PLOT, 
UNPLOT, CHftS. 
PEEK, USR 
Quando cit? urn 
acesso a ijtTis matriz. 


Nao utilized© 

O nome Ifomccido pg:a o piogiama 
e uma string vazia. 






























Apendice C 
Codigo de caracteres 


Apendice C - C6digo de Caracteres 


Este & a coiifuntQ complete de caracteras do CF-20CL com 
£^dSc;o 5 ■em decimal e hexadecimal. 

Entaginando os t6dkjos sob a forma de iiogyagem de m&quind 
ZBC , vamos enconTrar os rnneijnidrtiz05 conespondentes nas ties 
col Linas a dive it a. Como voc£ deve saber, algumas instm^es do Z80 
sSo compostas, conne^ando com CBh ou EDI'i, como se pode 
uenflear nas auas eolunas da dtrelta. 



CODIGO 

ASSEMBLER 230 

CARACTERE 


r 

MNEUMONICO 

Ap&s CR 

Ap6s ED 

espa^o 

0 

00 

NOP 

RLC B 


FI 

1 

01 

LB BC, nn 

RLCC 


m 

2 

02 

LD (BCLA 

RLC D 


n 

3 

03 

INC BC 

RLC E 


■. 

4 

04 

INC B 

RLC B 


i 

5 

05 

DEC 

RLC L 


•a 

6 

06 

LD B,n 

RLC (HU 


p 

7 

07 

RLCA 

RLC A 


m 

S 

OS 

EX AF P AF 

RRCB 



9 

09 

ADDHLBC 

RRCC 


m 

10 

0A 

LD A,(BC) 

RRC D 


h 

11 

OB 

DEC SC 

RRC E 


£ 

12 

OC 

INC C 

RRC H 


l 

13 

0D 

DEC C 

RRC L 


- 

14 

OE 

LD C,n 

RRC (HLJ 


? 

15 

OF 

RRC A 

RRC A 


( 

16 

10 

DJNZ dis 

RL B 


) 

17 

11 

LD DE p nn 

RL C 


> 

IS 

12 

LD (DE) P A 

RL D 


< 

19 

13 

INC DE 

RL E 



20 

14 

INC D 

RL H 


+ 

21 

15 

DEC D 

RL L 

- 


22 

16 

LD D r n 

RL (HU 


* 

23 

17 

RLA 

RL A 


, / 

24 

18 

JR dis 

RR B 


j * * 

25 

19 

ADDHL.DE 

RR C 


P 

26 

1A 

LD A.SDE} 

RR D 



27 

IB 

DEC DE 

RR E 


0 

28 

1C 

INC E 

RR H 


l 

29 

ID 

DEC E 

RR L 


2 

30 

IE 

LD E h n 

RR {HU 


3 

31 

IF 

RRA 

RR A 


4 

32 

20 

JR NZ.dl$ 

SLAB 


5 

33 

21 

LD HL p nn 

SLAG 


6 

34 

22 

LD {nn)pHL 

SLA D 


7 

35 

23 

INC HL 

SLA E 


8 

36 

24 

INC H 

SLA H 


9 

37 

25 

DEC H 

SLAL 




115 






cOdigo 

ASSEMBLER Z80 

CARACTERE 

DEC 

HEX 

MNEUMONICO 

Ap6& CB 

$Ap6s ED 

A 

38 

26 

LD H,n 

SLA (HL) 


B 

39 

£7 

DAA 

SLA A 


C 

40 , 

23 

JR Z.d* 

SRAB 


D 

41 

£9 

add huhl 

SRAC 


£ 

42 

2A 

LD HL,(nn) 

SRAD 


F 

43 

£B 

DEC HL 

SRAE 

SRA e 

G 

44 

2C 

LNCL 

SRA H 


H 

45 

2D 

DEC L 

SRAL 


] 

46 

2E 

LD L h n 

SRA (HL) 


J 

47 

2F 

CPL 

SRA A 


K 

45 

30 

JR NC.dte 



L 

49 

31 

LD SP. nn 



M 

50 

32 

LD (nn).A 



N 

51 

33 

INC SP 



O 

52 

34 

INC mu 



P 

53 

35 

DEC (HL) 



Q 

54 

36 

LD (HL),n 



R 

55 

37 

SCF 



$ 

56 

38 

JR C 5 dl& 

SRLB 


T 

57 

39 

ADD HL.SP 

SRLC 


U 

58 

3A 

ID A,(nn) 

SRLD 


V 

59 

3ES 

DEC SP 

SRL E 


w 

60 

3C 

INCA 

SRH H 


X 

61 

3D 

DEC A 

SRL L 


V 

02 

3E 

LD A, ci 

SRL (HU 


1 

63 

3F 

CCF 

SRL A 


RND 

64 

40 

LD B,B 

BIT 03 

IN B,(Q 

IN KEYS 

66 

41 

LD B,C 

Err Q n C 

OUT (03 

PI 

66 

42 

LD B.D 

bito h d 

SBC HL.BC 

f 

67 

43 

LD B,E 

BIT 0 t E 

LD (nnRBC 


68 

44 

! LD B„H 

BIT 0.H 

NEG 


69 

45 

LDB P L 

BU 0,1 

RETN 


70 

46 

LD B.(HL) 

BIT 0,(HU 

!M 0 


71 

4? 

LD B,A 

BIT 0,A 

LD LA 


72 

4S 

LD C,D 

BIT 13 

IN CAQ 


73 

49 

LDC,C 

BIT l f C 

OUT (C),C 


74 

4A 

LD C,D 

BIT l.D 

ADC HL.BC 


75 

4B 

LD C3 

BIT 1,E 

LD BC P (tm) 


76 

4C 

LD C ? H 

BIT 1,H 



77 

4D 

LD C P L 

BIT 1,1 

RETI 

nflo usado < 

78 

4E 

LD C r (HL) 

BIT 1 .(HL) 


79 

4F 

LDC.A 

BUI,A 

LD R A 


SO 

50 

LD D;E 

BIT 2,B 

IN D P (C) 


81 

51 

LD D,C 

BIT 2,C 

OUT (C),D 


82 

52 

LD D,D 

BIT 2,D 

SBC HL.DE 


. S3 

53 

LDD.E 

BU23 

LD (rm)jDE 


84 

54 

LD D.H 

BIT £,H 



85 

55 

LD D P 1 

BIT 2 P L 



86 

56 

LD D P (HL) 

BU 2AHL) 

[M 1 


87 

57 

LDD.A 

BU 2.A 

ED A.l 


88 

5S 

LD E,B 

BIT 3 ; B 

IN E f (C) 


89 

59 

LD E>C 

BIT 3,C 

OUT (C)3 


90 

5A 

LD E,D 

BIT 3 P D 

ADC HL P DE 


« 

j SB 

LDE.E 

BU 33 

LD DE^nrtl 
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Ap^ndice C - C6digo de Caracfceres 


CARACTERE 


cGdigo 

ASSEMBLER 2S0 

DEC 

HEX 

MNEUMONtCO 

Apos CB 

SApes ED 


nao usado 


cursor para 
cima 

cursor para 
baixo 

cursor para 
taquarda 
cursor para 
dlreita 

GRAPHICS 

EDIT 

Emm 

DELETE 

K / L modo 

function 

ci3io usado 
e i-TkO usado 
n^o usado 
n&o usado 
numero 
cursor 


92 SC 

93 SD 

94 5E 

95 5F 

96 60 

97 61 
9S 62 
99 63 

100 64 

101 66 
66 





114 72 

US 73 

116 74 

117 75 

115 76 

119 77 

120 78 

121 79 

122 
123 


126 
127 
126 

129 

130 

131 

132 

133 

134 

135 

136 
13? 89 
I3B 8A 

139 SB 

140 SC 

141 SD 


LD E,H 
LD EJ 
LD Ej EHL) 
LD E,A 
LD H.B 
LD H.C 
LD H ( D 
LD H.E 
LD H h H 
LD HJ 
LD HJH(HL) 


BIT 3,H 
BIT 3,L 
BIT 3(HL) 
BIT 3,A 
BIT 4 f B 
BIT 4,C 
B5T 4,D 
BIT 4,E 
BIT 4,H 
BIT 4 P L 


BIT 4 t (HL) 
BIT4.A 
BIT 5,B 
BIT 5,C 
BIT 5,D 
BIT 5 h E 
BIT 5,H 
BIT 5 P L 
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CGDJGO 


ASSEMBLER 2W 


CARACTERE 


MNEUMONtCO 



























































A pen dice C - C6digo de Caracteres 


CARACTERE 


C6 DIG0 _ 

DEC HEX MNEUMONICO 


ASSEMBLER 280 
Apos CB 


4Apos ED 
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1 caractere 

cOdego 1 

ASSEMBLER ZSO 

DEC 

HEX 

MNEUMON1CO 

Ap6s CB 

Ap6s ED 

RUN 

247 

F7 

RST 48 

SET 6.A 


SAVE 

248 

F8 

RET M 

SET 7.B 


RAND 

249 

F9 

LD SP, HL 

SET 7 d C 


IF 

250 

FA 

JR M,nn 

SET 7,D 


CL5 

251 

FB 

El 

SET 7.E 


UNPLOT 

252 

FC 

CALL M,nn 

set 7 n h 


CLEAR 

253 

FD 

prefixo ds 






insiruijoes 






usando IY 






USANDO JY 

SET 7,1 


RETURN 

254 

FE 

CP n 

SET (HU 


COPY 

l 255 

1 FF 

RST 56 

SET 7,A 

--1 
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Glossario 


Glossaio 


AC ESSO — ManeSra pels qual urn conjunto de dados & introdozitjo 
na memdria do computador. 

ALLATGRJZAR — Dispor dados de forma aleatdria, ou seja, sem 
que obedecam a urna sequence ou relate pre-determinada. 

ALF ANUM BRICO — Quatquer um d-os caracteres usados em 
computa^So, iais como: ietras, numtros ou sinais de pontua^o. 
AUMENTAR — Suprir o computador com os dados a firn de quo 
sejam processados. 

ARQUTVO — Conjuntos de dados selecionados e reunidos 
necessaries para desenvoEver um certo processo. Acumulac&o de 
lrtfoitnd?5es na memdria do compulador. 

ARRAY — Conjunlo de dados relation ados a ulna variavel e que 
podem ser identify ad os separadainente atraves de um fndJce, O 
mesrno que Matrix Unidimensional- 

ASCII — Abreuialura de American Standard Code for Information 
Interchange (Cddicjo PadrSo Americano para Intercambio de 
Inform ag5o). A tada caractere do compulador cocrespondfi um 
codigo — urn sisiema de simbolos com que se represents este 
caractere. Este cfidlgo e utili^ado com o objetivo de fscilitai o 
intercamblo destas informa^Ses entire os vSiios sistemas de 
proce$samento. 

NOTA: No Ap£nd!ce C enoontra-se o conjunto complete de 

caracteres do CP-200 com seus respecttvos c6digos em 
decimal e hexadecimal. 




BASIC — AbrevJntura de Beginner's AtUPurposa Symbolfc 
Jnsirucfiorr Code (Cddigo Simbdlico de Instru^ao, Universal, para 
PtinciplanEes). UnguagEm de alto nfvel em programme, dirigida a 
pricKjpiantes. 

BIN ARID — Sistema num&rtco que empreg.a a base 2, ao inv£s da 
base 10 (decimal), dispondo dos digitos Oe 1 para (otmar ntimeros, 
BIT — Abreviatura de Binary digjT (Digrto Bin^noJ Unidade de 
informa^o tem o mesmo efeito. 

BREAK — Intermp^o na execu^a de um programs. Em BASfC a 

iristru^ao STOP tem o mesmo ddto 

BYTE - A manor unidade enderecauel na memoria do 

computadgr, conslltuida de 8 bits £ capaz de represents 256 valores 

dlferantes. 


CARACTEHE — Elemento de um conjunto de sfrnbolos utilizados 
na reptesentaqao gfr^fica de dados, Os sfmbolos trials usados sdo os 
dgadsmos de 0 ate 9, as letras. de A at£ Z t ou gustos sUmfcdos que 
o computador pode processor. 
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CO MAN DOS — Um si nd] ou mate sinais eletronicos emitidas para 
initiar on Jinafizar um certo processo. Fade ser r tambem, urns parte 
de umti instm^ao que determina qua) a proximo operafSo a set 
dessnuolvida. 

COMPUTADOR — Apardho eletrflnico eapaz de receber 
informaoGes, subrnete-las a um conjunto espeeificado e 
predeterminado de operogdes Logicas e matemSticas, e fcumecer o 
result-ado dessa$ opercwjSes. Consists, nonrialrnerite. de disposilivos 
de entrada e said a (E/S), unidades de armazenagsm, de c&culos 
afltmeticos e logicos, alem de uma unldade de controls (CPU). 


DADOS — SSo Letras, numeros ou sTmbolcs que podem ser 
cL.-J/kiddos, Jtwmof^adoa *■ piocesfatidi a fim de obCir^ a sohi^O 
de um deierrninado problems. Motor que o resulado do problems 
famb£m se constitul num dado. 

DEBUG — Process© de local izac&o e cotre^ao de quaisquer erros 
rtum programs de eomputador. Teste de programs h a fim de 
assegurar de que funaona eoiretamente. 

DELETE — Remover, elminar dados, corno, por exempki cancels 
dados de um regijlro de um aiquivo. 

DJSPOSfnvO - E uma parte flslc& do sistema do compulador 
usada para a entrada e safda de dados Ex.: tedado, impressora e 
tela 


EDtT/EDnAR — Processo de reajustar e corrigir dados ou de 
aperfeiccstf a Forma apresentada nas snforma^ues de uma Jjrtha de 
program a. 

ENDERE£G — Uma posi^ao da memdria onde o dado este 
armazenado. Norrnalmente d neprasenfrada em decimal ou 
hexadecimal (base 16). 

EMTRADA — Transference ds dados de fora para dentro do 
compiiiador. E$ta passagem de informagOes e posscvel atraves de fit a 
cassete, tedado. etc. 

ENTRAOA/SAIDA (E/S) — Termo generico que designs os dados 
que eutram ou saem do computador, Dispositive que torna possivel 
tal comunicajao. 


IMPRESSORA — Equipernento que atua coma perifehco do 
computador. caps/ de irnprimir e reproduiir caraqteres. fomecendo 
dados impressos, sob a forma de urria listagem, 

INTERFACE — O equipamenta que realiza e permite a IntertigafSo 
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Glossaries- 


entre os equlpamenbos perifenoos e o oomputador. 

INDICE — Valor num£ritO que determine a posicao de ym 
elemento dentno de urns nrntriz. E necess^no urn indies por 
dimens&o da malnz, Tambem denominado subucrito, 


KILOBYTE. K ou KBYTE — Con junto de 1024 byte de memoria. 
A&sinrt, 64 K de memoria repre^enta 64’' 1024 = 65536 byles de 

irnemona. 


UNGUAGEM — Conjunto de instruct ou normal que "ensinam 4 * 
ao computador como dfspor e ordenar os sJmbolos e caractenes para 
obter-se uma informa^ao. 

L1NGUAGEM DE .ALTO NIVEL — Uma linguagem em que os 
oomandos sfln posaveis de sqrem entend.dos pe!o cp-erador, sem 
que o mesmo ten ha, necessartemente, que conhetfir a arquitetura 
do oomputador ou seu conjunto de instrufQes intemas. 

LINGUAGEM DE MAQUINA — Conjunlo de caraderes. slnais e 
simboios, usualinenie espedlicados em codigos hexadecimals que slo 
processados pelo mlcroeompLiSador, numa opera^ao de 
decod at^So das inform a gOes e dados nele iritjoduddcs, 

LI STAGE M — Lista os dados „ instru££>*s ou rusidlados de um 
pnoyrama qu e s3o re fa cion ados em seqtienda peta impresses a. 

LOOP — Conjunto de itistruq6es que sao repetldas ate qua se alinja 
uma condi^o pre-determinada. 


K 

L 


MATRIZ - £ um grupo organi^do de dementos que podem ser 
idenbficados (oral ou separadamonte. 

Errs BASIC, qualquer nome tie varbvel pode deiMminar uma matins. 
Podem n atnda, as&umir multiples dimensOes: Mainz |n) signifies que 
da est& inserida em uma dlmen&ao: Mairiz (n.mji signifies que eb 
esla inserida em duas dimensOes. 

MEMORIA — Dispositive que pode receber e guardar dados e 
informal*, e fornece-ias de nouo, quando for acionado um sinal 
convenientri, 

MEMORIA DE ACESSO ALEATOR10 - RAM {Random Acess 
Memory) — Mem6ria em que se tern acesso a qualquer posi^So, 
tanto para a esdrita comq para a bitura,. Ag desligar-se o 
computador, todo eonteftdo do memdria RAM e perdido. 
MEMORIA EXCLUS1VA DE LE1TURA - ROM (Read Only 
Memory) — Memdria exclusive de Seitura, Armajena as inform at des 
e l4 dita" ao computador as notmas de oper^lo, de IcTma que se 
atinja um lesultado. 

As infgrmatOes guardadas no ROM sag chamadas de Program a 
Monitor e Interpr-etador de BASIC e nSo podem ser alteradas por 
program^o, 

M1CROCOMPUTADOR — Computador cuiu CPU [Um\dade 
Central de foocessamzntQ) & fermada oor um miirfipnooessador 
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MICROPROCESSADOH — E a urudade central de processamento 
de urn microcompiilador for mad a de um unico Cl (Circuiio 
Integrado). 


FRO GRAMA — Sequ^nc-ia de insTni££>es que delerminarn ao 
eompytador o procedimento adotado para resolver determinado 
problems. 


RQT1NA — Conjanto de instniQQes dispostas de lorma ordenada 
que Infltrui o computador sobre corno realizar determinada operacflo 

i 

SA1L>A — Processo de transfer^ncia de dados da memorja do 
compute dor para um dado dispositive (tela, impressora, etc). 

SINTAXE — As regras gramaticais para um conwido ou instrugao. 

Siniaxe, geralmente, refera-se £ pontuagSo ou ordem dos elementos 
denfro de uma instrug^o. 

STRING — Seqdfincia de sJnibolos e caracteres que sSo encadeados 
com um signlfieada estntdmente literal For exempto, os caracteres 
1234 assumiiA seu valor num£nto, enquanto que o string “1234’” 
reprrisentflra spends uma juslaposigSo dos taracleres 1, 2, 3 e 4. 

(Mote que o string e incluso entre aspas). 

STRING NULO — Um siring cup comprimento e zero. Por 
exemplo: a definite AI H ” faz com que seja um string nuio 
SALTO — Tipo de instrugSo que ordena ao computador que se 
diriia a um ponto determinado do program^, que n£o e a in strung 
segutnte na sequsncia normal. 


UJNlDADE CENTRAL DE PROCESSAMENTO (UPC ou CPU) 

— Parte de um compubidot que control a e realize as operagOes 
aritm^tLcai e togicas 


UARIAVEL NUMERIC A — (Jtna grandeza, que pode assumir e 
presenter quaEquer seqOSncta de numeros, ou apenas um deles, 
isoladamente. 

VARIAVEL STRING — Uma grandeza que pode asiumir e 
represeniar qualquer seqia&ncia de caracteies. 
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Gloss ario 


Z80 - Tipo de microprocessador que opera com 8 bits. 
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Indice Remissivo 


Top ico 

Com 0 Cursor 

Teda 

C6digo 

P&gina 

A 





abs 


G 

210 

25 

ACS 

a 

S 

203 

26 

Aleat&lo 




26 110 

ALGOL 




n 

AND 




55 

Antilogailtmo 




26 

Argumento 




106 

Annazensmemo 




75 

Arquivo de imagem 

a 



104 

ASN 

A 

202 

25 

AT 

a 

C 

193 

23 

ATN 

a 

D 

204 

26 

e 

BASIC 




12 105 

BEn&ria 




121 

Sip 




10 

Bit 




21 

BREAK 




39 48 

Byte 




11 

c 

CasractelTf? 




121 

Cargcteres de texto 




10 

Caracteres irwerttdes 




10 27 37 

Chan^eda 

1 



m 

CHR$ 


U 

214 

75 

CLEAR 

a 

X 

263 

107 

CLS 

a 

V 

251 

19 94 

COBOL 




12 

CODE 

a 

I 

196 

75 

CtSdigo de mo quins 




115 

Comandp 




10 

Comparg^So de Numeros 




50 

Conrpsra^^Q Je Strings 




50 

CONI 


c 

232 

39 

Coordenads X 



84 

Coordenada Y 




84 

COPY 

a 

z 

255 

107 

COS 

a 

w 

200 

25 

CP-200 



7 

CPU la 




91 

Cursor Du 




19 30 

Cursor Eil 




25 

Cursor 0 




24 

Cursor ^ 




76 

Cursor {3 




I 13 19 

Cursor Q| 




16 
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